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INTRODUCTION 

FROM THE AUTHORS 



COMPUTERS ARE FOR KIDS is the slogan of the National Computer Camps 1 " 1 founded in 1977 
in Orange, Connecticut. Since then kids from all over have attended the camps. They all have one 
thing in common: THEY LOVE COMPUTERS. Comments by some boys and girls are: "It's fun 
and smart." ". . . it makes me think." "I can't wait to grow up and become a computer 
engineer." 

The ATARI Computer System, including the 400, 800, and XL series, is especially easy to learn to 
operate and program. The ATARI Home Computer is excellent at using color and sound. Kids of 
all ages enjoy making the Computer do as it is told. Yes the ATARI Home Computer is our 
friendly servant who always does as he is told. "Telling the Computer" is called programming. 
You're the boss — but you need to learn to talk its language. What language is that? Computer- 
eze? ATARI . . .? or . . . Well, the people who designed the ATARI Home Computer knew this 
would be a problem, so they designed it to speak a language called BASIC . . . And fortunately, 
BASIC is all simple English words — so it's not like you have to learn a foreign language! 

This book is written especially for youngsters who want to learn to program the ATARI Home 
Computer. No special background is needed. Only the most important parts of BASIC are cov- 
ered and the material is presented in a light and entertaining manner. Each reader should run as 
many programs as possible since computer programming is best learned by doing. A variety of 
activities make the book stimulating and interesting. 

The last chapter of the book, "Programs To Go" contains a series of programs which are educa- 
tional and recreational. Several of these programs were written by Marilyn Scheck. 

As you will soon see, working with the Computer means learning and having fun! 



Michael P. Zabinski, Ph.D. 
E. Michael Scheck 



NATIONAL COMPUTER CAMPS® PHOTOS 





Computer programming — an enjoyable experience. 
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CHAPTER 1 

TRY IT — YOU'LL LIKE IT 



The ATARI® 400 "7800™ Computer series consists of the keyboard, the tele- 
vision screen (or monitor), and the cassette recorder. 



T.V. VIDEO MONITOR *• 



CASSETTE RECORDER 




ATARI 400/800 




KEYBOARD 
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These parts of the Computer need to be connected properly. You may need 
some help. 




The keyboard is like a typewriter. We type instructions on it; that's how we 
"talk" to the Computer. 
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Open up the top of the Computer case and insert the BASIC cartridge (in 
the left slot on the ATARI 800 Home Computer). Then close the top. Turn 
on your ATARI Home Computer and TV (or monitor). Be sure to have the 
cassette recorder attached first. When READY appears on the screen, it is 
ready to go. 



BASIC CARTRIDGE 



KEYBOARD 
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The keyboard has keys with letters, numbers, punctuation, and many spe- 
cial character keys. Let's type the alphabet. 



A B C D E F G l-l I J K I .... M N P Q R S T U V W X Y Z 



appears on the video screen. 



Whatever we type always appears on the screen for us to see. To erase let- 
ters, press the ' key. Erase the alphabet. How many times do you 
have to press the (BACK S) key? 

That's right — 26 times. 

Now type your name and birth date. For example, 



UNITED STATES JULY 4„ 1776 



appears on the screen. 



To put spaces between words just press the : BAR) . To erase all of 

it, you press the key many times. Another way to erase an entire 

line is to press the D and keys at the same time (the 

(DELETE) & (BACK S) keys are the same key). 

Now let us locate some other keys on the keyboard. Can you find the fol- 
lowing keys? 



LETTERS 







DIGITS 







SPECIAL SYMBOLS 



H- 



1-4 




CHECKPOINT 



1. Can you figure out why the number zero has a slash through it? 

2. Are all the letters on the keyboard capital letters? 

3. What are the special keys? 



On the keyboard some keys are shared by two symbols. Press the and 

keys at the same time, what happens? Right, you see the quotation 
marks appear. Press the (SHIFT! key along with the (SEMICOLON) key 
and watch the colon (2 dots) appear on the screen. 




EXPERIMENT 



The best way to learn about the keyboard is to experiment with it. You can't break it ... so 
go ahead, play with it. Try out all the keys. 



My favorite key is 



When you're done experimenting, press the (SYSTEM RESET key. Wow, what happened? 
That's an easy way to erase all the clutter on the screen. 



V 



In your experimenting did you try the iCj j (control) key? How about the 
key? If you didn't, try this: 

Hold down the key and type at the same time. Kinda hard to read? 

But think of the pictures you could draw! Now push the . i key once. 
Nothing happened, yet! Play with the keyboard again — even the ( CTRL) 
key. Something else! 



1-5. 



What letters are not in the alphabet? 

Answer: The ones in a mailbox. 




CHALLENGE 



Your mission is to find out how many characters can be displayed on the screen in one line. 
HINT, keep typing. 



Then find out how many lines fit on the screen. HINT, use the (RETURN) key. 
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TIME OUT FOR OLD NEWS 



• You use the keyboard to communicate with the Computer. 

• The keys on the keyboard contain letters, digits and special symbols. 

• 24 lines of print fit on the screen. 

• 38 characters fit on one line. 



• The (SHIFT) (CLEAR) keys erase the screen. 



• The (BACK S) key erases one character at a time. 



The (SHIFT ) (DELETE) keys erase an entire line. 




£S3«I ^ 



CHAPTER 2 

COMMAND PERFORMANCE 



The Computer is your friendly helper. It always does exactly what you tell it 
to do. It can do calculations and display messages for you. The keyboard is 
used to "talk" to the Computer. We type instructions and send them to the 
Computer. 

When READY shows on the screen, the Computer is waiting for your com- 
mand. Is it really? Let's have the Computer add 1234 plus 5678. 



PRINT 1 
6912 



8 



Type this and press the [ RETURN ! key. 
The Computer displays the answer. 



Hey, that was fast! 

SLOW MOTION INSTANT REPLAY 



Type QDQDCDQDCD and press the S PACEBAR !, then type 
C3DC3D an d press the ( SPACEBAR ,!, then press the key, press the 

[SPACEBAR) and type QDGDCDGD- So far the answer does not show. 
The instruction needs to be sent to the Computer. Press the 
fRETURN ) key. Now the Computer quickly displays the answer. 



■BRAIN FOODi 



Always press the key to send your instruction to the Computer. 



7' O 



The PRINT statement is our first BASIC instruction. BASIC stands for Be- 
ginner's All-purpose Symbolic Instruction Code (everyone starts out as a 
beginner). The ATARI Home Computer understands the BASIC language 
and we will learn many more instructions. Appendix I lists the BASIC 
instructions. 



YOUR TURN 



Try the following arithmetic examples: 




YOU TYPE THE INSTRUCTION 






THE COMPUTER RESPONDS 



■ 



Copy it from the screen. 



PRINT 12+3 



Did you remember to press (RETURN) ? 



PRINT 12- 



PRINT 12*; 



PRINT 12 




1. Look at the above examples and then mark down the symbol for each of the following 
arithmetic operations. 




OPERATION 




SYMBOL 




Addition 
Subtraction 
Multiplication 
Division 






Typing messages is a lot of fun. Try this one. 



PRINT "I AM HAPPY" 
I AM HAPPY 



and press (RETURN] . 
The message appears. 



The message I AM HAPPY appears on the screen. The Computer displays 
the message exactly the way you type it. You need quotation marks around 
the message. 



II 
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EXPERIMENT 




Enter the following instructions exactly the way they are shown and try to predict how the 
Computer will respond. 



INSTRUCTION 




(what you 




ars on the screen) 



1. PR I NT "MY COMPUTER LIKES ME 



2. PRINT "TWELVE DOZEN IS"? 12* 



3. PRIM' 



What can you conclude from each of the above examples? 



^ 
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i BRAIN FOODi 



Messages in PRINT statements must have quotation marks around them. 



SHORTCUT 



Our Computer knows that we all like to save time. So instead of the instruction PRINT 
3 + 4 it accepts PR. 3 + 4, or ? 3 + 4. The PR. and the question mark are abbreviations for 
the PRINT. All the available abbreviations are listed in Appendix I. Try to anticipate the 
Computer's response for each of the following instructions. 




INSTRUCTION 



(what you type in) 



PRINT 365*100 




(what the Computer screen shows) 



PR. 365*10$ 



""' 365*100 



CHALLENGE 



What is the Computer's response to the instruction 




PRINT "5 + 



Can you explain it? 




10 






"BRAIN FOOD' 



PRINT displays on the screen; LPRINT displays on the printer. 




FUN TIME 

Fill in this crossword puzzle. 

ACROSS 

1. Press this key to send instructions to the Computer. 

4. Key to erase 1 line. 

5. A BASIC statement. 

6. Key to erase 1 character. 

DOWN 

1. When the Computer is waiting for your command. 

2. Symbol for multiplication. 

3. Used to enclose a message. 





1 








































2 






3 


4 






































5 
































6 
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EXERCISES 




1. 


What display will the following instruction produce? 

P R I N T " A R U N D T H E W R L D IN " S 4 + 40 ; " D A YS " 


2. 


Write a BASIC instruction to figure out the number of minutes in one week. 




3. 


Write an instruction to calculate the height of a six foot person in centimeters. There are 12 
inches in one foot and 2.54 centimeters in one inch. Make the display come out in this 
form: 

SIX FEET EQUAL CENTIMETERS. 


4. 


Use two PRINT statements to display your name and home address. 







12 




CHAPTER 3 

FIX-IT SHOP WITH COLOR & SOUND 



We humans sometimes make mistakes. But the Computer helps us catch 
them by displaying error messages. 

Try this; I know it's wrong: 



PR I MI 

ERROR 



+4 

PRINT I M 



What you type. 

How the Computer responds. 



This is an error message. Do you notice the I is in a white block? That is 
how the Computer shows you where the error is. 

Now, how do you correct it? 



You can type the entire line over again, or you can use the C RLJ key. Let's 
try it! 



When you hold down the I RL) (control) key the other keys do special 
things. 



Do you see the 4 arrows over by the key? Try them out. Try to 

move the cursor (that's the white block) onto the E of ERROR — . 



Press the CTRL .) key together with the key. 

Now that you're there you have two jobs: erase the ERROR — , and retype 
both the M and the i ID 

To eliminate the ERROR — all you have to do is delete it. Hold down the 
[CTRL key and press the DELETE BACK key 8 times. Your Com- 
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puter screen should look like this: 

P R I M T 3 + 4 What you typed. 

PR 1 M I 3+4 What remains of the error message. 

Try to move the cursor to the M in the second line. That's right — use the 
key with the '- : key. When you are on the M, type ! I. The Com- 
puter replaces the M with the N. 

P R I M 7 3 + 4 PRIMT needs to be fixed. 

P R I M T 3 + 4 Now it reads PRINT. 

Move the cursor again. This time position it on the U. You must type the 3 
over again, the Computer does not know the 1 3_) is a 3. Finally press 
D to tell the Computer that you have finished making corrections on 
that line. 

So here's what we have done: 

PR I MT 3+4 What you typed in. 

PR I NT 3+4 The corrected line. 

"7 The Computer's response. 

Let's correct another line. 

F'PR I I I I T 6*4+8 What you type. 

ERROR — PPRIIJ.IT 6*4+8 

First let's get rid of the ERROR — Move the cursor to the beginning of the 
error line (that's right (CTRL) and the arrows). 

To delete th e ERROR — , hold down the TRD and press the 
(DELETE BACK S) key 8 times. 

Presto! The error message is gone, but not the error. Now to fix our line. 
Move the cursor again, do you know where? That's right, move it onto the 
first P of the second line. This time we want to delete the P so press the 
(CTRL) and (DELETE BACK S keys together, once. 

PPR I I I I T 6*4 + 8 What you typed. 

PR I I I I T 6*4 I 8 What remains of the error message. 

What's that? Only one character is gone? What do you know! Now get rid 
of the extra Fs. Use the ' and keys together to move the cursor. 

Now press the BD and keys several times. Here's 

what we have. 

p p r :i: :i: :i: :i: r 6 # 4 + s what you typed. 

PRI I j^-M+b 1 What remains of the error message. 

14 
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What's the matter? Oh — PRIT isn't quite right, is it? How do you INSERT 
the N? Move the cursor over the T. Then find the key and 

press it together with the (CTRL) key. Now type in the space, and of 

course press RETURN . Don't forget to retype the ;[). 



F'F'RI I I IT 6*4+8 
PRINT 6*4+8 



What you typed in. 
The corrected line. 
The Computer's response. 



Go ahead, move the cursor around the screen and play around some more. 
Inserting and deleting letters is called editing. 



■BRAIN FOODi 



CTRL) will insert 1 space with (INSERT />). or delete 1 character with [DELETE BACK'S) . 



[SHIFT ) will insert 1 line with fINSERT/» . or delete 1 line with [DELETE BACK'S) . 



By the way — you'll find a list of error messages in Appendix II. 



UPPER AND LOWER CASE 



While you were trying out keys, did you find that the I ' key 

will give you lower case letters after you press it? 



Press the CAPS LOWR ) key. 

The Computer is now like a typewriter, lower case letters unless you hold 

down the [SHIFT key. 



Try this: 



PRINT "Atari is great" 
Atari is great 



Use the (SHIFT,) key to type the 

■ I ■ D. CD. and CD. 



How do you get back to all capitals? Press the I and (CJ 

keys together one more time. 

Try this: 



Hold down i£TJ j and press the ( CAP key (remember those spe- 

cial characters?). Now you can type the graphics characters. 



Return to all caps by using the [ and fj I keys. 
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"BRAIN FOODi 



When you are stuck and can't seem to get the Computer to work, press the 
(SYSTEM RESET) key. It will get everything back to the way it was when the Com- 
puter was first turned on. 




COLOR 



Now let's do some painting. 

In this chapter we will introduce the color capabilities of the ATARI Home 
Computer. In a later chapter there will be more on color. 

Type: 



"COLOR 



4, 10 



The 4 and 10 combination colors the screen. 



Look at that — Pink! 

Change the middle number to anything from to 15 (I'll wait). A nice rain- 
bow of colors isn't it? Try changing the last number, any even number from 
to 14. 



SETCOLOR 2,4., 6 



You can choose 8 shades of each of the 16 colors. Appendix IV lists the 16 

16 
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colors and their numbers. 

To color the border rather than the background, change the first number of 
the SETCOLOR command: 

SETCOLOR 4, 4, 10 
You can still use all the color and shade combinations as before. 



With 2 SETCOLOR instructions both the border and the background can 
be colored: 



SETCOLOR 2,4, 10 
SETCOLOR 4. 12, 10 



Try it — you'll like it. 




SETCOLOR 4, 12, 10 




YOUR TURN 

After typing in the SETCOLOR instruction describe the color of the screen's 
background or border. 





THE COMPUTER RESPONDS 



DS 



Copy it from the screen. 



SETCOLOR 2,5,2 



SETCOLOR 2,4, 1 



SETCOLOR 4, 12, 4 



SETCOLOR 4, 14,6 
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SOUND 

Now an introduction to sound and music. 
Type in SOUND 0,121,10,8 

SOUND 0, 121, 10, 8 



.3-6 



Do you recognize middle C? 



If you get tired of the noise type END and press I [URN) Change the 
second number — anything from to 255. Can you play a tune? Appendix 
V is a list of the sound numbers and tones. How about a chord? 



SO. 0, 121,, IS,, 10 

BO. 1,91 , 10, 8 

BO. 2, 72, 10,, 8 

SO. 3, 60 „ 10, 10 



You noticed! — four sounds at once. How about that? Change the first 
number and you can get more than one "voice" at the same time. Change 
the last and you change the volume. 

Try changing the third number. Some weird sounds come out don't they 
(don't forget END). With the correct combinations you can get good sound 
effects — just like the arcades. 




SOUND 2, 21, 8, 12 

yv 

/ 




qualify number 
thru 15 



volume number 

even numbers 

thru 14 



I . ^. 
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YOUR TURN 

After typing in the SOUND instruction describe the tone (high/low), volume 
(loud/soft), quality (pure tone/harsh/buzzing/etc. ). 





THE COMPUTER RESPONDS 



DS 



3DUND 0,200, 10, 4 



BOUND , 100, 8, 10 



SOUND 1 ., 15, 4,6 



BOUND 1, 1, 1, 10 



BOUND 0, 0,0,0 



SOUND 1 , 151, 6, 6 



Would you like to combine sound and color? Type: 



SO, 1 , 50, .1. 0, 8 S SE„ 2,6,4 but don't press fRETURN) vet! 

Let's look at what's there — 2 instructions on one line. All you need is the 
colon (2 dots) between the instructions. When you press (RJ TURN) both in- 
structions are executed. More than one instruction on a single line is called 
chaining. 

Again try it, you may not like it, but then again you may. 



jf^i ^*> 
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FUN TIME 

Find the answers to these questions in the word search. 



1. Instruction to turn on the "voices' 



2. The key used with the arrows to move the cursor. 



3. Instruction to change colors. 



4. The key to erase a letter. 



5. The key to clear the screen. 



6. Used when all else fails (2 words). 




D E L A 


S C M Q R 


N S B 


R L E 1 


S E A 


READS 


SUNT 


NAMED 


ONCE 


C R A K L 


N D U C 


L R E A 


DELE 


T E L T R 


N C L 


T C U O S 


U S Y S 


T E M L R 


C R E 


S E T O C 
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TIME OUT FOR OLD NEWS 



The (CTRL) key is used to edit the screen. 



• To insert 1 character press the (CTRL) and (INSERT/>) keys 
together. 



• To delete 1 character press the (CTTC and (DELETE BAClTSl keys 
together. 



To delete an entire line press the (SHIFT) and (DELETE BACTD 
keys together. 



The (CAPS LOWR) key is used to change to lower case letters. 



(SHIFT) and (CAPS LOWR) are used together to change to upper case 
letters. 



(CTRL) and (CAPS LOWR) are used together to change to graphics 
characters. 

SETCOLOR (abbreviated SE.) changes the color of the screen. 

SOUND (abbreviated SO.) activates the sound registers. 

Combining more than one instruction on one line is called chaining. 
Use colons between each instruction. 
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7. Give examples of your favorite color and sound instruction. 



2 2 
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1. Correcting errors is called 



2. Which key combination deletes a character? 



3. Which key combination inserts an entire line? 



4. How do you shift from capital to lower case letters & back? 



5. How many colors can the ATARI Home Computer use? 



6. Which 2 instructions give you sound and color? 




CHAPTER a 

RUNNING IS GOOD FOR YOU 

The area of a rectangle equals its length times its width. 

AREA = LENGTH x WIDTH 

If your bedroom is 12 feet long and 10 feet wide then the area is 12 x 10 
= 120 square feet. The lengths and widths vary from room to room in your 
house and so do the areas. 

Get it? The length, width, and area may vary. They are variables. We will 
call the variable length L, the variable width W and the variable area A. 
Can you tell how we picked the names L, W, and A for these variables? 

Now back to the bedroom. The length is 12 and the width is 10. 

LET L -~- .1.2 L is the length. We've given it the value 12. 

LET W = 10 W is the width. It is 10 feet. 

LET A = L*W The area is calculated. It equals length times width. 

PRINT A Display the area. 

120 The area equals 120 square feet. 

A variable is a name that represents information stored in the Computer. We 
use the LET statement to give a variable a value. 

Now for the living room: 

23 
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LET L = 20 
LET W ■ 15 
LET A = L*W 
PRINT A 
300 



Length L is now 20. 
Width W is now 15. 



The area is now 300 square Jeet. 



The value of a variable remains in memory until it is changed. 



PRINT L 

20 

LET L ■ 15 

PRINT L 

15 



L is still 20 Jeet. 
Change L. 

L is now 15: it is no longer 20. 




The name of a variable may be from 


one to 120 characters long. 








The first character must be a letter, 
combination of letters and digits. 


It can be followed by other letters, 


or 


digits, 


or a 


Proper variable names: 










A AB AS 


EZ ROWS PAUSE 1 









YOUR TURN 



Can you find the 3 incorrect names? Circle them. 




M Z BP L+ C 4K "I" 5 



// you circled L + , 4K, and 55 you are correct. L+ uses a special symbol 
(the +), and 4K & 55 both start with a digit. 



PROGRAMS 



Let's turn that living room problem into a program. 

A computer program is a set of instructions. The instructions are given to 
the Computer in order. It is like a boss giving a worker detailed instructions. 

Here are the instructions — the program you type in. 

24 
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Nfc.l 


V 




1 


LET L 


■ 20 


20 


LET W 


- 15 


30 


LET A 


= L*W 


40 


PRINT 


"AREA 


50 


END 





! H 



Type CHXEOD ond press the (RETURN ) key. 

Af the end of each line press {RETURN) . 

W equals 15. 

A is calculated. 

This instruction will display the answer. 



Notice that even though we have finished typing in all the instructions, no 
answers appear. More about that later. 

We first type in QDCL)® ■ This command erases everything in the Com- 
puter's working memory. Always type in QT) before you enter a 
program. 

Each line of the program has a number. The line numbers tell the Com- 
puter the sequence of instructions. The lowest number is first. We skip line 
numbers so that we can place other instructions in between if necessary. 



What is the spacing between line numbers in the above program? 



JO is correct; the line numbers 10, 20, 30, 40, & 50 are 10 digits apart. 



BRAIN FOOD" 



The LET statements give values to the variables. 






Moving right along we find the last instruction to be the END statement. 
Guess what that says to the Computer. Right, it means this is the end of the 
program. 

Your worker (the Computer) now has all of its instructions and is waiting for 
the boss' command . . . RUN. 



RUN 

AREA * 300 



You type in QDQDGD and press (RETURN !. 
Line 40 of the program displays the answer. 



The RUN command tells the Computer to run the program. 
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1. What is the first instruction of our program': 



2. When this program is run, which line produces the display on the screen? 



3. Now that the program is in memory, what would happen if we type C D, press [I lETURNl , and then 

type GDGDGD and press (RETURN) ? Try it, you may not like it! 



A DISCOVERY 


I am 4 feet 5 inches tall. How many centimeters is that? There are approxi- 
mately 2.5 centimeters in one inch. 


NEW 

10 Lhl F » 4 Variable F for feet. 

20 Lb. 1 I 5 Variable I for inches. 

30 LET T ; ~ 1- * 1 .,:./! ■ I Variable T for total inches. 

40 PRINT 7 Display the height in inches. 

50 L : - : 2«S*I Compute centimeters. 

60 PRINT C Display centimeters. 

/0 PR INI 1 ~ ., I The Computer remembers my height 

80 END in feet and inches. 


RUM Ask for a run. 
b ■.:!■ 4 feet 5 inches equals 53 inches. 
1 32 .. 5 My height is 132.5 centimeters. 
4 5 Or 4 feet 5 inches. 


In the above example two new things crept in: 


• The LET is not required. 


C => 2.5*T 


is a good as 


LEI C = 2-S*T 
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• We displayed the values of F and I with one 


PRINT statement. 


PRINT F, :i: 




The comma separates the variables F and I. 






EXPERIMENT 




The difference between a semicolon ";" and a comma "," is only a dot. To the Computer 
this dot makes a big difference. 



Type in 



PRINT 1 ! 25 3; 45 55 6 



and press (RETURN ). 



Type in 



PR IN" 



'il I i] ■-..' ij 



and press ( RETURN ). 



It is all in the dot! The semicolons display the numbers close together (no spaces at all). 
The commas display the numbers with space between them. There are four zones across 
the screen. Each of the four zones has 10 print positions. 



Type in 



1 ,, ,, 2 , ,, :! : , , 4 , „ S ,, ,, k and press (RETUR N). 



Tricky, huh? The extra comma skips one zone between each number. 
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Pretend you are the Computer and run each of the following programs. (No 
fair cheating — try it on your own before using the Computer). Compare 
your answers with the Computer's responses. Watch out for spacing. 



a) NEW 



b) NEW 





10 PRINT "I AM BREAT" 




10 Q=34„53 






20 END 




20 R=98„32 






RUN 




30 PRINT R+Q,R-Q,R#Q 

40 END 
RUN 


,R/Q 


c) 


NEW 

10 A=1234 

20 B=»567S 




d) NEW 

10 PRINT 20,20*20 
5 PRINT 10, 10*10 






30 PRINT B; "+"; A, "EQUALS 


" , A-i-B 


15 PRINT 30,30*30 






40 END 




RUN 






RUN 
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DISCOVERY 

The last program, program (d), helps us discover that: 

1. A spacing of 5 between line numbers is as good as a spacing of 
10. 

2. Each PRINT statement prints on the screen on a separate line. 

3. The END statement is not necessary. You may skip it. 

4. Programs are RUN in the sequence of line numbers. The line 
with the lowest line number first, and the highest line number 
last. 



AHA, lot's to learn from such a short program, but there is more to come! 



EXPERIMENT 




The I AM GREAT program, Program (a) above, displays the message I AM GREAT. How 
can we change the display to I AM THE GREATEST? 



Right, just edit the PRINT line. Using the [ CTRLJ /grrou; combo, position the cursor between 
the words AM and GREAT. Insert 4 spaces — that's right use the (CTRL) and [INSERT) 
keys. 



10 PRINT "I AM 
20 END 



SREAT" 



Type CDGDCD into the spaces. Now move the cursor to the end quote and type in the 
CDtJDCECD, and press [RETURN] . 

10 PRINT "I AM THE GREATEST" 

20 END 

RUN 

I AM THE GREATEST 

Now the program displays the new message. 
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YOUR TURN 

Try this on the Computer (no line numbers this time). 
Give the variable A the value 1. 




Give the variable B the value 2. 



Write a statement to display the value of A. Then write a second statement 
to display the value of B. 



Display the value of variable E. 



We have not given E a value. That is why it is zero. Display the values of A, 
B, and E on one line. 




TIME OUT FOR OLD NEWS 

• A computer program consists of a set of instructions. Each in- 
struction has a line number. The instruction with the lowest line 
number is run first. 

• To RUN a program type in QDQDGD and press (RETURN) . 

• The END statement is optional. 

Semicolons in a PRINT produce a compact display. 

Commas in a PRINT produce a display in the 4 zones across 

the screen. Each zone consists of 10 spaces. 

• The NEW command erases working memory. Always type 
QDCBGD before typing in a program. 
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1. List the two BASIC instructions you have learned so far. 



2. What will be the Computer's response to this instruction? 



PRINT "6+10 



5 6+10 



3. What will be the Computer's response to this instruction? 



h+3~=9 



Can you explain the reason for the response? 



4. Predict the Computer's response to the following: 

A =■■■■ 5 
B = 6 
PRINT B+A; B-A, A+B 



5. Predict the Computer's display for this program: 

NEW 

10 A= 50 

5 PRINT "HELLO" 

12 8= 46 

20 PRINT A+B 

30 PRINT A*B 

25 PRINT A-B 
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6. Write a program to display the weight of a dozen eggs (1 egg = 1.4 oz.). 



7. Edit the program in exercise 6 to use 50 eggs. 
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CHAPTER 5 

READING IS EASY 

Remember our living room program? 

NEW 

10 LET L * 20 Length is 20. 

20 LET W ~ 15 Width is 15. 

30 LET A » L*W Area is calculated as L times W. 

40 PRINT "AREA = "3 A Display the area. 

50 END 

Another way of entering the length and the width into the Comptuer is with 
a READ and DATA combination. Here are the instructions. 

MEW 

10 READ L,W Notice the comma. 

20 A = L*W 

30 PRINT "AREA = "5 A The message in quotes helps us read the answer. 

40 DATA 20,, 15 
50 END 

The READ statement tells the Computer to get values for variables A and B 
in the DATA statement. Here L = 20 and W= 15. 

QOGQ QqOQ 
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LETS PRETEND 

Pretend you are the Computer and run each of the following programs. 
Write each of the Computer's responses in the boxes. 



NEW 

10 READ A,, Q 

20 DAI' A ft., 8 

30 PRINT A+Qi 

40 END 

RUN 



5 A-Q, A*D5 " "' ■! A/Q 



NEW 

100 READ N,R 

200 DA T A 6 , Bt 

300 PRINT !, 2-i 

400 END 

RUM 



l+3*R=" i 2*M+3*R 




MORE NEWS 

Numerical variables have a number as their value. For example, 

N = 5 Numerical variable N equals 5. 

String variables have a string of characters as their value. The characters 
can be any letters, numbers, or symbols from the keyboard. For example, 



N* = "R2--D2" 



String variable N$ equals the string of 5 characters R2-D2. 



So what's new? 



1. String variables have a $ symbol at the end of their names. 
Examples of string variable names are: 



A$ 



AB$ 



MZ$ 



R2$ 



2. What the string variable is equal to, must be in quotation marks: 



A*=" MARION" 



R2$="8IRL" 



34 



5-3. 



YOUR TURN 

Underline the string variables and circle the numerical variables. 




A$ 



C5$ 



N$ 



BS 



A6 



A6$ 



// you underlined all the variables with the dollar sign then you did great! 
The string variables are A$, C5$, N$, and A6$. A, BS. and A6 are numeric 
variables and should have been circled. 



My name is ATARI 400 Home Computer (or ATARI 800 Home Computer). 
To enter my name into the Computer with string variable N$, type: 



NEW 

5 DIM N*(9: 



10 LIE! N*«" ATARI 400" 
20 PRINT N* 
RUN 
ATARI 400 



DIM tells the Computer how long the string N$ will be in this 
program. 

The quotation marks are required. 
NS is a character string. 



To dimension a string use DIM followed by the string variable name and a 
number in the parentheses. This number is the number of characters the 
string can have. If you have several string variables, just list them all after the 
DIM with commas between them. 

Let's store another string variable in the Computer. Don't type QDCDGD. 
The string variable we now add is B$. 



3 DIM M*<9) ,,B*(:I.8> 

30 B*»"UNITED STATES" 

40 PR . B* 

RUN 

ATARI 400 

UNITED STATES 



Variable B$ can be up to 18 characters long. 
The LET is not needed. 
The PRINT is abbreviated. 

N$ is still in the Computer. 
B$ is displayed. 



Do you notice the new lines? 



Let's take another look at the program. We erase the screen by pressing the 
and (CLEAR ) keys together. Now type CDCDCSDCD and press 
(RETURN) . 



5 DIM N*<9) !,B$<i8) 

10 LET N*=" ATARI 400" 

20 PRINT N* 

3 B $ = " U M I T E D S T A T E S " 

40 PRINT B$ 
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The original program had only three lines. (Lines 5, 10 and 20). We then 
added Lines 30 and 40. The LIST instruction tells the Computer to display 
the entire program. 

The READ — DATA statements can also be used to read string variables 
together with numerical variables. Here's a program to find the average of 
three grades: 



MEW 










5 DIM M* 


( 6 ) 








1 RIEAD 


N*,61, (? 


2 „ g: 


'. 




20 DATA 


MART DM, 


94., £ 


?9, '•?& 




30 PRINT 


"STL JDE 


NT:: ' 


,, ,, N* 




40 PR INI 


"GRADE 


s: ", 


„ G 1 S 


1! it 


50 PRINT 


"A VERA 


GE E 


iRADE 


n n 


RUN 










STUDENT: 






MAR 


I ON 


GRADES: 






94 


89 


AVERAGE 


GRADE: 
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The spacing looks terrific! 






A DISCOVERY 

Why are the parentheses needed in Line 50? 

First clue: type in P R I N "i" 9 4 + 8 9 + 9 / 3 
Second clue: type in PRINT (94+89+90) / 3 

O.K. Sherlock, can you deduce the answer? 


and press (RETURN'. 
and press RETURN'. 




Why are there two 


commas after the quotes in Lines 30 and 40? 




(Type the program 


without the extra comma and see what happens.) 
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BACK TO THE AVERAGING PROGRAM 

How about if we now average Amy's grades? Her grades are 97, 79 (bad 
news), and 100 (right on!). We must change the DATA statement of Line 20. 

20 DATA AMY ., 97 ,, 79 ,, 1 00 and press IRITORN'. 

We change the program by editing or retyping Line 20 in the program. In 
this case, retyping is easier. 



RUN 










STUDENT; 




Al'h 






GRADES: 




9 7 


79 


.1.00 


AVERASE 


brade; 
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Sure enough, the changes worked. Let's take another look at this program. 
Erase the screen. (Do you remember how? Yes, press the II FT ) and 
CLEAR keys together). Now type and press fURNj . 

LIST 

5 D I M N* < 6 ) 

:9 READ M$- , Gl . G2 , C53 

26 DATA AMY , 97 . 79 , 100 

30 PRINT "STUDENT: " , ,N» 

46 PRINT "GRADES :". ,61 : " " : 62 : " h ;G3 

58 PRINT "AVERAGE GRADE: " , < Gl+G2+63>/3 



Very nice, the new Line 20 is now part of the program. The old Line 20 
(with Marion's grades) is gone. 



What is a sure way to live to be 
100 years old? 
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FUN TIME — WORD SEARCH 

There are 12 Computer vocabulary words hidden in the puzzle. The lucky words are always 
in a straight line. They may be read down or up, from left to right right to left or even di- 
agonally. Circle the words. Happy hunting. 




The words are: 






BASIC 


EQUAL 


PRINT 


CLEAR 


LET 


READ 


COMMA 


LIST 


READY 


DATA 


NEW 


RUN 




B C D A T A O 



Z A T I N E L 



C Q S W S Q A 



S K F I E I U 



T E L T C N Q 



T N I R P V E 



B K R D N T A 



W N T A F S M 



L U M E E I M 



N R J R V L O 



C R E A D Y C 
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BRAIN FOOD 



& 



• To display the instructions of a program on the screen, type in QDCDQDQD an d 
press (RETURN) . 

• To change a line in the program, retype the entire line or edit the line. To delete (re- 
move) a line from the program, type its line number and press (RETURN). 

• The DATA statement contains data for the variables in the READ statement. The 
DATA statement can be placed anywhere in the program, even before the READ 
statement. 



EXPERIMENT 




How can we put 2 strings together in a PRINT? 
Let's see! 



NEW 

10 DIM N* (6) ,, B$ (6) 
20 N*="UNITED M 
30 B**" STATES" 
40 PRINT N*SB* 
RUN 
UNITEDSTATES 



No space between the words. 



Why isn't there a space between the words? Right! We didn't put a space into the quotes. 
We can add a space after UNITED or we can add a space before STATES. Let's add the 
space after UNITED. 

1. Use the (CTRL) and CD keys to get back to Line 20. 

2. Use the (CTRL ) and ® keys to get to the end of UNITED. 



3. Use the ' CTRL) and (INSERT ) keys to add the space, then press (RETURN]. 

4. To display the two words, move the cursor (use the (CTRL) and 3D keys) to the begin- 
ning of the RUN statement and press (RETURN ). 

Did it work? The screen should now show. 

UNITED STATES 



The space is there — good work. 
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TIME OUT FOR OLD NEWS 

1. There are two types of variables, numerical and string variables. 

2. Names of string variables end with the symbol $. 

3. Variable names must start with a letter. The name can have 
120 characters. The remaining characters can be letters or 
digits. 

4. LET A = 5 assigns the value 5 to the variable A. The LET is not 
necessary. 

5. A$ = "CARA" assigns the character string CARA to the vari- 
able A$. The quotation marks are required. 

6. Every string variable must appear in the DIM statement. DIM 
A$ (10) means the string variable can be up to 10 characters 
long. 

7. When the Computer is first turned on, all numerical variables 
are zero and all string variables are blank. 

8. When a variable is given a new value, its old value is lost. 
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1. Give one example for each of the two types of variables. 



2. Now try this. Turn the Computer off and then back on. How will the Computer respond to 
each of the following instructions? 




INSTRUCTION 



Hi 



COMPUTER'S RESPONSE 




PRINT Z 



PRINT Z$ 



3. Locate errors in the following statements. Some statements are correct. 




a. 10 READ,A,B,C 



b. 15 REA 



^u 



c. 20 READ X r'„ Z 



d. 25 DAT 



H 5 „ , <b , / 



e. 30 PRINT A.BSC/D 



PRINTE, F. 6 



g- 40 READ A,B,C 
45 DATA 3, 4 



4. What display will the following programs produce? Pay special attention to the spaces (blanks) 
in the display. 
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NEW b. NEW 

5 DIM A* (4) j,B*(13) 

10 READ A$.,B* 10 A = 6 

1 5 DATA JACK , AND J I LL 20 PR I NT A ., B ., A + 7 ;: 

20 PRINT A*?BS 30 END 

RUN RUN 



H M 



5. Write and run a program which uses variables A, B and C to display D. Use A = 2, B = 3, C = 4, 
and D = A*B-C. 



6. Write a program to produce the following picture of a tree. HINT: Use seven print instructions. 



X 
X X X 
XXXXX 
XXXXXXX 
XXX 
XXX 
XXX 
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CHAPTER G 

OH — 
TO BE A RECORDING STAR 



Writing computer programs is a lot of fun. Once we have typed them in, we 
can run them over and over. But what happens at the end of the day when 
we must turn off the Computer? We lose the program. Turning off the Com- 
puter wipes out memory. So if we do not want to have to retype the pro- 
gram the next day, we better save it on cassette or disk. It is like saving 
money in the bank. 

We want to learn how to save a program on cassette tape, or on a disk, and 
how to load a program back into the Computer. 

Later on in this chapter, we'll get to disks. 

SAVING A PROGRAM ON TAPE 

To save a program we must follow some simple instructions: 



1. Place a cassette tape in the recorder and rewind it. 

2. Set the digital counter to zero. 

3. Advance the tape counter 2 numbers (never save at 
tape yet, just the leader). 

4. On the keyboard type in the command 



you won't be on the 
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GDGCQDGDGD and press I RETOJW) . 

5. The Computer will beep twice (to remind you to press the JD) & (PL 
buttons). 

6. Now, on the recorder press the and buttons together, then press 
(RETURN ii again. 

7. The cassette player now begins to turn. 

8. Once the program is saved the READY appears on the screen. 

9. Check the digital counter and write down where on the tape the program is 
saved (both the beginning & end numbers). 



That's all. The program is now saved. Is it really for sure? To make sure, 
save the program again. But first advance the tape counter two or three 
numbers, then repeat steps 4 through 9. 

SAVING MANY PROGRAMS ON ONE TAPE 

Programs can be saved one after the other on the same tape. To avoid con- 
fusion write down the names of the programs and the digital counter read- 
ings on the case. For example: 



mm.wm 

■ ■ !■ 



PROGRAM TITLE DIGITAL COUNT 



Hi-Low game 2-14 

Star Wars 20 - 48 

Arithmetic Practice 50 - 81 

Shoot the Duck 85-106 



It's fun to collect computer programs and to trade programs with your 
friends. 



LOAD FROM TAPE TO COMPUTER 

You and your friend want to play Star Wars. Place the tape containing the 
program Star Wars in the recorder. The program you want starts at the digi- 
tal counter position 20. Rewind the tape and set the digital counter to zero. 
Press the (Al button on the recorder and advance the tape to 20 

on the digital counter. Type and press INT. The 

Computer beeps once (to tell you that you are loading not saving), now 
press the button and again press . The cassette recorder 

begins to turn. When the READY appears, the program has been loaded. 
You can now play Star Wars. 
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1. To save a program on tape we type the command 



and press 



2. Which buttons must be pressed on the cassette recorder when we want to save a program on tape? 



3. To load a program from tape type in the command 



and press the 



then press the 



button on the recorder, and press the 



again. 





FUN TIME 

This is the game of Hi-Low. The Computer picks a number between 1 and 
100, As you try to guess the number, the Computer tells you whether your 
guess is too high or too low. You continue the game until you guess the 
number. Here is a program for Hi-Low: 

NEW 

10 REM HI -LOW GAME: 

15 PR. "I AM THINKING OF A NUMBER BETWEEN 1 AND 100." 

20 N = I NT ( 1 00*RND ( ) + 1 ) 

25 PR,, "YOUR BUESS IS"! :: INPUT G 

30 IF M > 6 THEN 50 

35 IF N < G THEN 60 

40 PR. "#*## YOU GOT IT ***#" 

45 END 

50 PR,, "YOUR GUESS IS TOD LOW - TRY AGAIN" I GOTO 25 

60 PR. "YOUR GUESS IS TOO HIGH - TRY AGAIN" : GOTO 25 

In Line 20, the Computer picks a surprise number between 1 and 100. In 
Line 25, you get to type in your guess. More about all that later. 

Run the program to make sure you didn't make any typing mistakes. 
I can always guess the number in seven guesses or less. Can you? 
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To save the program place a tape into the recorder and rewind it. Then re- 
set the digital counter to zero. Advance the tape 2 numbers, and press the 
(RECORD) and (PLAY) buttons. 

If the tape already has some programs on it rewind it and set the counter to 
zero. Then advance the digital counter 2 numbers past the end of the last 
program saved, then press the (RECORD) and I PLAY buttons. 

Type in 

QDGDQDQDCE) ami press i returnl 



When the Computer has beeped twice press (f J again. 



CHALLENGE 

Modify the Hi-Low game to count the number of guesses. Once the correct number is 
guessed the Computer should display the message: 

**** YOU BDT IT IN 6UESSES ###* 
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USING THE DISK DRIVE 

When you use the disk drive you have to tell the Computer about it before 
you turn it on. So if your Computer is on, turn it off. 

Before anything else, be sure the disk drive is connected to the Computer. 
The cable should be plugged into the side of the Computer and into either 
of the slots in the back of the disk drive itself. 

Now open the door to the disk drive and turn on its power switch. That's 
right — you turn on the switch with no disk in the disk drive (powering up, 
or down, could damage the contents of the disk). 




FIGURE 6.1 
INSERTING A DISK 




When the disk drive stops spinning put in the Master Disk (the one with 
DOS on it), close the door and turn on the Computer. 

To use the disk system you have to load DOS into the Computer. But that's 
easy, just type: 



CECBCSD 



and press (RETURN . 



DOS stands for Disk Operating System. 
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DISK OPERATING SYSTEM II '.'ERSION 
COPYRIGHT 19BH A1 





DISK DI REC 1 in , 


1 . 


i ORM 


1 , 


RUN i nM RIDGE 


J, 


DUPLICATE DISK 




COPY FILE 




BINARY Si 


D, 


DELETE FILE(S) 


L. 


BINARY LOAD 




in in 


11. 


RUN AT ADLi 


F, 


LOO l ll 1 


N. 


i ATE MEM.SAV 


G, 


UNLOCK 1 


0. 


DUPI. Mr, II mm 


H > 


WRITE DOS Mi 


■i 





FIGURE 62 
DOS MENU 



DOS includes 15 programs A through O. The list of these programs is dis- 
played in the form of a menu. Yes it is a menu because you can select and 
use any of the programs. These programs are very useful so we better 
make a copy of the Master Disk. We will backup the Master Disk. Once we 
have a backup we can put the original in a safe place. 

COPY YOUR SYSTEM DISK 

We need to use two of the DOS menu choices. First we need to format the 
new blank disk. You can also buy disks that are already formatted. These 
are Atari Formatted disks. Take the Master Disk out of the drive, and put in 
the unformatted disk. Then type: 



CD 



ami press (RETURN!. 



The Computer responds: 



WHICH DRIVE TO FORMAT 



You type (if you have more than 1 disk drive put the unformatted disk 

in drive 1 ) and press (RETURN). The Computer responds: 



TYPE "Y" TO FORMAT DISK 



Re sure you have the correct disk in. 
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So you type i and press IBS). 

Now you want to make this a system disk, so when the formatting is com- 
plete type: 

and press [RETURN). 

You are still using drive 1 so answer the questions the same as above. 

Now you have 2 system disks — the Master Disk and your new System 
Disk. Put the Master Disk away in a safe place, and use it only when creat- 
ing a new System Disk. 

To return to BASIC type: 

I Bj and press (BEIUBM). 



BRAIN FOOD 



Turn on the disk drive before the Computer. 

Be sure there is no disk in the drive before the drive is turned on or off. 

You only format a new (unformatted) disk. 

If you format a used disk you will erase all of its contents. 

Keep the Master Disk safe, if you lose it you may have trouble creating a new one. 



SAVING A PROGRAM ON DISK 

Let's save the Hi-Low game on disk. Be sure that the disk drive is turned 
on, a System Disk is inserted into the drive, then the Computer is turned on. 
Go back a page or two to type in the game. Once you have typed in the 
program, run it to be sure it works. 

To save the program on the disk type: 



TURN). 



Wow, that is fast! The Dl: tells the Computer that the disk on which we are 
saving the program is in disk drive number 1. 

The Computer will save the program with the name HILOW1. Each new 
program you save has its own name. Names of programs can have letters or 
digits or both, but: 
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1. the first character must be a letter, and 

2. the name can be no more than 8 characters long, and 

3. the name must use only letters or numbers. 




The following are names of programs. Some of these are correct names and some are in- 
correct. Circle the incorrect names and explain why. 



"STARWARS" 



"HILOW 1' 



"ARITHMETIC" 



"X007" 



"007X' 



O.K. 2 out of 5 program names are correct. The name "ARITHMETIC" is more than 8 
characters long, "007X" doesn't start with a letter and the blank in "HILOW 1" is not 
allowed. 



To load the program from disk into the Computer you type: 

CDCSDCECElCiDCECrJCDCEicnaDaDairii I H " I and press mam. 



Again we notice the Dl:. It tells the Computer to load the program 
HILOW1 from the disk located in drive number 1. The name of the pro- 
gram to load follows and all this information is in quotes. 

Saving programs on disk or loading programs from disk into the Computer 
is very fast compared with tapes. 

If you forget the name of a program you saved, there's no problem, type: 



CECQDCsD 
CD 



and press RETURNi 



and press RETURN 1 twire. 



The Computer will list the names of all the programs on that disk. This is a 
directory of the programs. 

Once you've found the program you want, type 1 1 to get back to BASIC. 

Then type: 

LOAD "Dl! program name" 



and you're all set to run the program. Don't forget to re-save your program 
if you do change it. Use the same program name if you want the old ver- 
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sion of the program to be wiped out. 



YOUR TURN 



Save this proqram on your disk: 




NEW 

:l.0 TONE = 

20 SETCOLOR 2, TONE, 6 

25 F. X«l TO 50 ;: M„ ) 

30 IF TONE M 5 THEM 10 

40 rONE=TONE+l :: G.20 

50 END 



The program colors the screen in each of the available 16 colors. 




CARE AND FEEDING OF DISKS 



• When you handle a disk always touch only the cover — mois- 
ture from your hand will spoil the disk; scratches are a no-no. 

• The disk should be in only two places — the disk drive or the 
protective sleeve. 

• Don't bend them or force them into the drive slot. 

• A cold disk needs to warm up in the room before it is used 
(don't heat them unless you like to see them melt). 

• Keep the disk in a safe place — not near the T.V. 
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1. Why would you want to save a program? 



2. Which command do you use to save a program on tape? 



3. Which command do you use to save a program on disk? 



4. A rewound tape containing several programs is placed in the cassette recorder. You then 



type in QDQDUDtA H D i and press 



Ulilli* 



Will that command load a program? 



Which one? 



5. You have a disk containing 3 programs "ONE," "TWO," & "THREE." How do you load 
program "TWO" into the Computer? 



6. What is the difference between CLOAD and LOAD? 
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7. What must you do to each new disk? 



8. What are the rules for a program name used to save on a disk? 



9. Why might you prefer to save a program on disk instead of tape? 
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10. What sequence of operations must you perform before you can save a program on cas- 
sette? on disk? 



a.) Cassette 



b.) Disk 
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CHAPTER 7 

A FRIENDLY CONVERSATION 



Just think, you type (JDGDCHD, P ress (RETURN ) and the Computer 
displays: 



HI, I AM TUTOR COMPUTER 
WHAT IS YOUR NAME 



You then type in your name QDCOJDCDQD an d the Computer 
responds: 



HEY SANTA I AM 
HO HO HO 



PLEASED TO MEET YOU 



The INPUT (abbreviated I.) statement lets you type in information from the 
keyboard. When the INPUT statement is reached in the program the Com- 
puter stops, displays a question mark, and lets you type. 



Here is the program. 



MEW 

5 DIM N$(30) 

1 P R „ ' ' H I ,, I A M T U T R C M P I J T E R ' ! 

20 PR. "WHAT IS YOUR NAME" 

25 INPUT N* 

30 PR. "HEY "SN*!" I AM PLEASED TO MEET YOU' 

40 PR. "HO HO HO" 
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Request a RUN. 

The Computer introduces itself. 



RUN 

HI,, I AM TUTOR COMPUTER 

WHAT IS YOUR MAME 

'7"3f)N T H After the ? you type your name. 

HEY SANTA I AM PLEASED TO MEET YOU 

HO HO HO 



In Line 25 of the program the name you type in is assigned to the string 
variable N$. In Line 30 N$ is used to display your name. 



A SHORTCUT 



Lines 20 and 25 can be combined: 



10 PR. "WHAT IS YOUR MAME" : INPUT M* 



is the same as 




20 PR. "WHAT I 
25 INPUT M* 



YOUR 



q|1E 



The colon combines the PRINT and INPUT instructions into a single in- 
struction. Go ahead, retype the program with a colon and use the abbrevia- 
tion I. for INPUT: 



5 DIM N*< 50 > 

IS PR. "HI, 1 AM TUTOR COMPUTER 1 

28 PR. "WHAT IS FOUR NAME": I.N? 

Al 

48 PR . " HO HO HO" 






tfr 



COMPUTER MAGIC 



The Computer asks you to think of a three-digit number such as 222, or 
666, or 999. You are then asked to input the sum of the three digits. If the 
number you pick is 222 then the sum you enter is 6 (2 + 2 + 2 = 6). The 
Computer takes this clue and figures out your three digit number. How 
smart! 
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NEW 


»^ 


:l. 


PR. 


20 


PR. 


II 


30 


PR,, 


11 


40 


PR . 


» 


50 


PR. 


II 


60 


PR . 


II 



'THINK OF A THREE-DIGIT NUMBER" 
ALL. THREE DIGITS MUST BE THE SAME" 
FOR EXAMPLE 777" 

THE SUM OF THE DIGITS IS" : INPUT S 
YOUR NUMBER IS "i 37#S 



RUN 

THINK OF A THREE-DIGIT NUMBER 

ALL THREE DIGITS MUST BE THE SAME 

FOR EXAMPLE 777 

THE SUM OF THE DIGITS IS 

YOUR NUMBER IS 222 

RUN 

THINK OF A THREE-DIGIT NUMBER 

ALL THREE DIGITS MUST BE THE SAME 

FOR EXAMPLE 777 

THE SUM OF THE DIGITS IS 

YOUR NUMBER IS 333 



The Computer gives good instructions. 

You are thinking of 222. 

You type in the sum 6. 
The Computer is right on. 

Request another run. 



You are thinking of 333. 

You type in the 9. 

The Computer does it again. 



Pretty good! The Computer did OK twice. Type in the program and try it 
on a friend. It always works like magic. 

Did you notice what the PR. " i" command of Line 10 did? It removed all 
the clutter from the screen. To clear the screen in a program you still use the 
( SHIFT ) & ( CLEAR J keys. But you use them like this: 



Type QDCBDCDC8DCDCD. 

Then press the (ESC) key once. 

Then the (SHIFT) (CLEAR ) combo (that gives you the^ 

Then type the last CD. 



ft -ft 
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1. Each of the following INPUT statements has one error. Can you find it? Circle all the errors and write 
the corrected statements. 



INCORRECT STATEMENT 



CORRECTED STATEMENT 



10 INPUT ,A,B 



1 5 I N P U T ' ' W H A T I S Y D U R A (3 E " ji A 



20 IMPUT A„A* 



25 INPUT XSYSZ* 



30 INPUT L l v l N 



2. Study the two programs and fill in the missing information. 



ME 



NEW 



5 DIM A $(10 


) 






10 PR,, "T 


YPE 


3 NUMBER! 


10 PR,, "TYPE 


YOUR 


: name 11 : 


1 „ A* 


15 INPUT 


x „ r „ 




15 PR,, "TYPE 


A Nl. 


IMBER" :: 3 


', . A 


25 PR,, X„ 


x -!■• ¥ , 


X'i-Y +Z 


20 PR „ A* 








35 END 






\ : PR. A, A + 2 














RUN 








RUN 






TYPE i Dl IR hi A 


ME 






TYPE 3 NU 


MBER: 


3 


7ERIC 














TYPE h NUMBE 

:*' J. xs 


R 






--. 








i 


•.m" 


to 



3. Can you combine the following two-line program into a single line? 



10 PR. "WHAT 
20 INPUT N* 



IS YOUR NAME' 
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THE BATTLE OF INPUT AGAINST READ 



We've learned two ways of feeding the Computer. 

INPUT gives you a chance to enter different information each time the pro- 
gram is run. That is nice, but it slows down the calculations. The Computer 
stops, displays a question mark and waits for you to type in information. 

READ gets the information from the DATA statement. Each time the pro- 
gram is run the information is read from the DATA statement. It is non-stop. 
It is fast. If you wanted to change the DATA you would have to retype the 
DATA statement with different information. 

Compare: 



NEW 






10 F 


vEAD 


A „ B „ C 


20 I 


>ATA 


.1. I| .ll,. IJ -...' 


30 L 


JET I 


)=A+B+C 


40 F 


-'R . ' 


'SUM IS "3D 


50 lr 


•ND 




RUN 






SUM 


IS t 


J 



NEW 

10 INPUT A,, B,C 

( H 8 1'" e t h & r e i s n o I... :i. n e 
30 LET D^A+B-i-C 
40 PR. "SUM IS " ; D 
50 END 



W) 



RUN 

? l , 2 , 3 
SUM IS 6 



What you type in. 

The Computer responds. 




You want the sum of 4, 5, and 6. How would you do it (a) using the above READ program, and (b) using 
the above INPUT program? 
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REMARK — EVERYBODY DOES 

REMark statements are placed in a program to help understand the pro- 
gram. REMarks are not displayed on the screen during a run — only during 
a list. If our program is already in the Computer we type QDCDODQ 
and the program quickly appears on the screen. 



LIST 

10 REM HOMEWORK DUE JUNE 11, 2000 

20 REM TEMPERATURE CONVERSION PROGRAM 

30 PRINT "DEGREES CELSIUS" 2 INPUT C 

40 F = 32 + C*9/5 

50 PRINT "DEGREES FAHRENHEIT "!F 



RUN 

DEGREES CELSIUS 

? 20 

DEGREES FAHRENHEIT 68 



You type in the 20. 

The Computer gives you the answer. 



Lines 10 and 20 are REM statements. They explain what the program does. 
They do not appear in the output. 




if 



EXPERIMENT 



Use the temperature conversion program to draw a graph. Run the program 5 times. The 
first time input zero degrees for C, then 25, 50, 75, and 100. Copy the Fahrenheit degrees 
from the screen into the table. Then draw points on the graph. Connect the points. They 
form a ???. 



Fill in the rest of the table. 



°c 





25 


50 


75 


100 


°F 


32 











TABLE 



11 
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Add more points to 
°F 

250 

225 

200 

175 

150 

125 

100 
GRAPH 

75 
50 
25 


the graph and connect them. 














}} 
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c 


) 25 50 75 100 °C 



DID YOU KNOW? 



Water boils at 100°C and freezes at 0°C. In degrees Fahrenheit water boils 



at 



°F and freezes at 



°F. 
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TIME OUT FOR OLD NEWS 



The INPUT statement is used in a program when you want to type 
in information during a run. 

You should always use a PRINT with an INPUT to give directions 
for the question mark. For example, PR. "WHAT IS YOUR 
NAME" : I. N$ 

The REM statement is used to explain what the program does. 
REM statements only show up in a list. They do not show up in a 
run. 




FUN TIME 

There are 14 words hidden in the puzzle. Find the word that matches each 
description. The words may be up or down, from left to right, right to left, or 
even diagonally. Circle the words. 

1. Command to display the program. 




2. Command to load a program from a tape. 

3. Key that erases a character on the screen. 

4. Command to run a program. 

5. Assigns a value to a variable. 

6. Command to play music. 



7. Command to store a program on a disk. 

8. It is only sometimes required. 

9. Contains values for variables. 
10. Used to explain the program. 



11. Will cause the display to appear in the next print zone. 

12. Erases memory. 

13. Can be abbreviated as a question mark. 



14. Causes the Computer to display a question mark. 
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Happy hunting. 




T S 

X R 

E T 

N S 

I D 

E N 

N E 

B R 

R U 

E N 

A D 

K R 

E A 



I 

L 

A 

P 

E 

K 

T 

A 

N 

E 

W 

T 

T 



L 

G 

T 

I 

F 
T 
H 
E 
N 
T 
T 
I 
R 



W 

E 
A 
N 
L 
H 
I 

N 
I 

P 
R 
E 
N 



P 

D 

D 

F 

P 

I 

L 

F 

E 

L 

I 

N 

E 



R 

R 

E 

E 

P 

T 

N 

I 

R 

P 

D 

D 

D 



H 

Y 

T 

L 

R 

I 

R 

G 

D 

N 

N 

C 

L 



F 

S 

I 

N 

E 

N 

F 

R 

C 

M 

L 

L 

R 



S 
E 
N 
D 
M 
T 
G 
S 
T 
O 

o 

E 
P 



H 
N 
P 
S 

D 
P 
E 
W 
A 
U 
M 
M 
E 



S 
O 

u 

N 

D 

I 

R 

D 

T 

V 

B 

M 



E 
A 
T 
E 
L 
N 
C 
N 
P 
L 





1. What is the difference between the PRINT"^ " statement and the 
combination? 



2. What does the following program do? 



63 



10 



NEW 

10 PR. "WHAT YEAR IS THIS" I! INPUT Y 

20 PR. "HOW OLD ARE YOU" S INPUT A 

30 PR,. "IN YEAR 2001 YOU WILL. BE " J 200 1 -Y+A 5 " YEARS OLD" 



3. Write a program which will produce the following conversation. 

RUN 

KNOCK KNOCK,, WHO IS THERE 

GEORGE WHO 

YOU MUST BE PULLING MY LEG! 



4. Clear the screen and then list the program you wrote in exercise 3. 



5. Write a program to input three numbers and display their product. 
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CHAPTER 8 

IF YOU WANT TO 



It is a cold, gray winter morning. You just woke up, and turned on the radio 
to get a weather report. The weatherman says: 



More SNOW folks! NINE inches fell overnight. 



There is no school if more than 20 centimeters of snow have fallen. Is it a 
snow day? Are nine inches of snow more than 20 centimeters? You turn to 
your Computer for the answer. 



LIST 

10 REM PROGRAM TO CONVERT INCHES TO CENTIMETERS 

20 PRINT "INCHES OP SNOW" ! INPUT INCH 

30 REM THERE ARE 2.54 CENTIMETERS IN ONE INCH 

40 CENT » 2.54 * INCH 

50 IP CENT > 20 THEN B0 

60 PRINT "NO SNOW DAY" 

70 END 

80 PRINT "YES, IT IS A SNOW DAY" 

90 PRINT " GO BACK TO BED" 

100 END 

RUN 

INCHES OP SNOW 

YES, IT IS A SNOW DAY 
' GO BACK TO BED 
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A DISCOVERY 

We notice that besides doing additions or subtractions Computers can also 
compare. Look at Line 50 of the above program: 

IF CENT > 20 THEN 80 

This line compares CENT to 20. If CENT is larger than 20, the Computer 
transfers to Line 80. Otherwise it continues with the next line (Line 60). 



FLOWCHARTS 

There is a pictorial way of showing all of this. It's called a flowchart. It 
shows the flow of the program. A flowchart for this program would be: 



(20) 



(20) 



( 




) 


\ 


/ / 
1 1 


\ 


/ / 
/ / 



(40) 



(50) 



(60) 



(70) 
(100) 



CENT = 
2.54 . INCH 




PRINT 

"NO SNOW 

DAY" 



(end) 



/PRINT "YES" 
-*/ IT IS A 
SNOW DAY" 



FIGURE 8.1 



(80) 



PRINT 

"GO BACK 

TO BED" 



(90) 
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All information going into and coming out of the Computer is put into paral- 
lelograms (those are the PRINT & INPUT boxes above). Work is put into a 
rectangle (you all know what those are), and questions go into a diamond 
(like a ball diamond). All the boxes are connected by arrows. 

Notice that the questions are the only boxes with 2 arrows coming out. They 
have to be labeled with either a YES or a NO (1 of each please). 













START/END 




( 


\ 


) 






\ 






CALCULATIONS/ 






















ASSIGNMENTS 






1 










1 






INPUT/OUTPUT 




/ 




/ 






\ 








^\YES 


DECISIONS 






NO 








FIGURE 8.2 



Try out the flowchart for a 7 inch snow storm. Now CENT is less than 20 
since 2.54*7 is only 17.8. So the arrow labeled NO is followed and the 
message NO SNOW DAY appears. Do it again for 10 inches of snow. Works 
pretty good, doesn't it? 

Flowcharts help you see the flow of a program. Always draw the flowcharts 
before writing the program. Flowcharts are especially helpful when you face 
a problem you just can't seem to figure out. We'll try some more flowcharts 
later. 
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There are six different comparison symbols that can be used with IF-THEN 
statements. 



Greater than 


> 


Less than 


< 


Equal to 


= 


Not equal to 


<> 


Greater than or equal to 


> = 


(Not less than) 




Less than or equal to 


< = 


(Not greater than) 





IF-THEN statements form conditions which are either true or false. Here are 
some examples: 



EXAMPLES 



MEANING 



10 IF A ~ 5 THEN 71 
15 . 



If A equals 5 go to Line 75. 

If A does not equal 5 continue on to the next line. Line 15. 



30 ]> ft+4 > 

40 . „ „ „ 



10 THEM 80 



// the sum A + 4 is larger than or equal to 10 transfer to Line 
80. otherwise continue on to the next line. Line 40. 



80 „ 
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YOUR TURN 




50 IF A <> B THEN 200 



60 



8? 



// C is less than 1000 then transfer to Line 70, otherwise con- 
tinue at Line 90. 



(Jill in the number) 



The first answer should be: If A is not equal to B then transfer to Line 200, otherwise continue at Line 60. 
The second answer should be: 85 IF C < 1000 THEN 70 



9 !' ; 1 



COMPUTER QUIZ 



You enter any 2 numbers. You then ask your friend to enter the sum of the 
2 numbers. The Computer checks your friend's answer. 

NEW 

10 PR. "YOUR TWO NUMBERS" S INPUT A,B 

20 PR. "THE SUM IS" " INPUT S 

30 IF S ■ h+B THEN 60 

40 PR. "NOPE, THE CORRECT ANSWER IS"; A+B 

50 END 

60 PR. "YOU ARE A WHIZ KID" 

70 END 



RUN 

YOUR TWO NUMBERS 

THE SUM IS 

YOU ARE A WHIZ KID 

RUN 

YOUR TWO NUMBERS 

THE SUM IS 



Request a run. 

You enter 25 and 15. 

For the sum you enter 40. 
You are right. 

Request another run. 

You enter 11 and 13. 

You enter 25 for the sum. 



Fill in the Computer's response. 
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EXPERIMENT 



Use the Computer quiz program to make up your own quiz. 
Here are some quiz ideas: 

1. Subtract, multiply, or divide two numbers. Which lines in the program need to be 
changed? 

2. Add three numbers. 



REMEMBER: To change a line in a program just use the editor. 




1. How many comparison symbols can you name? 



2. What is the purpose of IF-THEN statements? 



3. Find the errors in the following statements: 




CORRECTED STATEMENTS 




a. 10 IF A ■ B+12 THEN 



b. IF 5 » C THEN 20 
70 



8 



c. 15 IF B 



10 THEN 25 



d. 40 IF W = 10 THEN 45 
45 ... . 



e - 60 IF M EQUALS Z THEN 90 



STRINGS AGAIN 

Do you remember what a string variable is??? 

A string variable has a string of characters as its value. The name of a string 
variable always ends with the symbol $. For example: 

LET As = "I WAS BORN IN 1776" 



Well, what is the name of the string variable we use here? 
What is the character string? 

MORE PRACTICE WITH IF-THEN 

The IF-THEN statement can also be used to compare strings. 
For example: 



10 IF E* 
15. . .. 



YES" THEN 60 



Transfer to Line 60 if string variable E$ = "YES", otherwise 
continue with the next line. Line 15. 




Which is the richest country in the world? 



ANSWER: 



Ireland, because its capital is always DUBLIN, (get it?) 
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Let's try it in a program: 



NEW 

10 DIM D*<5) 

20 PR . " TRUE OR FALSE 11X1 1 - 1 3 1 

30 INPUT D* 

40 IF D* ■ "TRUE" THEN 60 

50 PR.. "YOU ARE RI6HT ON" 

55 END 

60 PR. "YOU LOST YOUR COOL" 

70 END 

RUN 

TRUE OR FALSE 11X11-131 

7 F fit St. 

YOU ARE RIGHT ON 

RUN 

TRUE OR FALSE 1 1 x 1 1 » 1 3 1 

77 RUE 



D$ is dimensioned 5 because FALSE has 5 letters. 



You answer FALSE. 



You answer TRUE. 



Now how does the computer respond? 



CHALLENGE 



Delete Line 55 from t he TRUE /FALSE program. Remember? To delete a line, 
line number and press (RETURN) , 

Type GDGD and press (RETURN) . Line 55 has been deleted. 

We now list the program and take a look at it. 



10 DIM D*(5) 

20 PR I NT "TRUE OR FALSE 11X11 
30 INPUT D* 

40 IF D* - "TRUE" THEN 60 
50 PR I NT "YOU ARE RI6HT ON" 
60 PR I NT" YOU LOST YOUR COOL" 
70 END 



O.K., Line 55 is gone. Now what happens if we run the program? What do you find? 
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FUN TIME 

Use the clues to figure out the sentence. 

iiiiiiiii in m nm 

12 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 

a. Key to erase the screen ° u 

1 

b. Abbreviation for the PRINT 

2 3 

c. The > is a 

4 

d. <> means 

5 

e. The is optional. 

7 6 

f. Nothing happens before this key is pressed 

8 

g. B$ is a variable. 

9 

h. Sign for division 

10 

i. Competes with INPUT 

11 

j. It is usually optional, it stops the program 

12 

k. They go together 

13 

1. When the is not true, the run continues on the next line. 

14 

m. Command to run a program 

15 

n. Used to type on the Computer 

16 

o. Command to display a program 

17 

p. To a line, type its number and press ( RETURN) . 

18 
q. < means than. I 

19 
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TIME OUT FOR OLD NEWS 

The action has been fierce. We need some time to review. 

1. The IF-THEN statement makes comparisons between numbers 
or between strings. 

2. 10 IF A = 55 THEN 40 
15 ... . 

• Here the IF-THEN statement is line number 10. It is followed 
by Line 15. 

• The condition is A = 55. 

• If the condition is true the Computer branches to line number 
40. 

• If the condition is not true the Computer continues on the 
next line. That would be Line 15 in our example. 

3. 10 IF N$ = "ERIC" THEN 80 

This statement compares the string variable N$ to the charac- 
ter string "ERIC." 

4. There are six comparison symbols: 

> < = <> >= < = 

5. To list a program which is in the Computer's memory we type 
LIST. 

6. To delete a line in a program we type its line number and press 
(RETURN) . 

7. To change a line in a program we can retype the entire line, or 
use the editor. 
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1. Draw a flowchart box to branch if L is less than 22. 



2. Write an IF-THEN statement to branch to Line 40 if L is less than 22. 



3. Write an IF-THEN statement to branch to Line 65 if K is not equal to 63. Otherwise con- 
tinue at Line 64. 



4. Fill in the missing information: 



10 INPUT A 



20 IF A < 18 THEN 

30 PRINT "YOU CAN VOTE" 



40 



50 PRINT "YOU ARE TOO YOUNG TO VOTE" 
60 END 



5. Fill these instructions into the flowchart. Note, the instructions need to be ordered. 
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PRINT "HAPPY BIRTHDAY " ; N$ 

PRINT "TYPE IN YOUR NAME" 

INPUT N$ 

IP A* = "YES" 

PRINT "IS TODAY YOUR BIRTHDAY 

PRINT "TOO BAD" 

DIM N*<25) , A*(3> 

INPUT A* 

END 

START 
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6. This program has two major mistakes. Can you find them and fix the program? 

10 DIM N*(7) 
15 INPUT N* 

20 IF N* *» LINCOLN THEN 50 

30 PRINT "NICE TO MEET YOU " ; N* 

40 END 



7. Draw a flowchart to INPUT a number. If the number is positive have the Computer display: 



THE NUMBER 



IS POSITIVE 



Otherwise have the Computer display: 



I DON'T LIKE YOUR NUMBER 
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8. Write a program for problem #7. 
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CHAPTER 9 

LOOP - THE - LOOP 



A Computer can do a job over and over. The Computer is accurate and 
fast. It does not take coffee breaks and never gets tired. Oh, I wish I could 
be like that. 

Doing a job over and over means doing it repeatedly. We may have to do 
the job ten times, one hundred times or maybe a thousand times. It is nice 
to know that our old reliable Computer will do it for us. The job is written in 
the form of a computer program. The instructions that are repeated in the 
program form a loop. Let's try a silly loop. 



MEW 

10 REM AROUND AND AROUND WE 
20 PR. "FOREVER" 
30 GOTO 20 
40 END 

RUM 

FOREVER 
FOREVER 
FOREVER 



iO 



Lines 20 and 30 form a loop. 



Press the ( BREAK) key to stop the hoping. 



The screen is quickly filled with FOREVER's. The Computer goes non-stop. 
The loop of Lines 20 and 30 is an infinite loop. The Computer prints the 
word FOREVER in Line 20. Then the GOTO in Line 30 sends it back to 
Line 20. FOREVER is again displayed on the screen. It will not stop by it- 
self. But you can stop this madness, just press the ( BREAK ) key. To continue 
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looping ty pe G OTO 20 (or G.20) and press ( RETURN ) To stop it again, 
press the BREAK j key. 

COUNTERS 

How can you make the Computer count? The best way is to use a counter. 
A counter looks like this: 

new 

1 COUNT=0 Start the counter at 0. 

20 PR,. COUNT 

30 COUNT ~ COUNT+1 Add 1 to the counter. 

40 GOTO 20 Go back to the print line. 

50 END 

RUN 
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In this program the variable COUNT is continually changing. First it stores 
the value 0. At Line 30, COUNT is increased by 1. It was zero, so it be- 
comes 1. After that the program returns to the PRINT, then adds 1 to 
COUNT — now it is 2; then back to Line 20 and so on. 

Let's talk about Line 30. COUNT is the name of a memory location in the 
Computer. At this line of the program the Computer takes the number 
stored at COUNT, adds 1 to it, then stores the answer back at location 
COUNT. Each time the program executes Line 30 the value of COUNT 
goes up (is incremented) by 1. 

To have the Computer count by 2, change Line 30 to be COUNT = 
COUNT + 2. How could the program be changed to have the Computer 
count by 2's starting at 100? So COUNT equals 100, then 102, 104 

That's right — start the counter at 100. Make these two changes and list the 
program. 

L I ST 

10 COUNT = 100 Start the counter at 100. 

20 PRINT COUNT 

30 COUNT - COUNT +2 Add 2 to the counter. 

40 GOTO 20 
50 END 

RUN Request a run. 

100 
102 
104 
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Study this counter program: 

NEW 

10 COUNT' ■ 

25 COUNT * COUN" 

35 PR. COUNT 

40 B. 25 

50 END 



1. What is the first number printed? . 



2. What is the second number printed? 



3. How can you stop the program? 

Let's use the GOTO to read some numbers? 



NEW 

10 READ A,, B 

20 PR. AS "+"5BS " = : "5 A+B 

30 GOTO 10 

40 DATA 6, 8, 17, 19,23, 12 

50 END 

RUN 

6+8 « .1.4 

17+19 * 36 

23-H.2 « 35 

ERROR 6 -■ AT LIME 10 



what happened? 



Error 6 is telling you that the Computer has run out of numbers to read. 
This is what happens: On Line 10 the Computer reads the first 2 numbers 
(6 & 8). In Line 20 it prints. Line 30 tells it to go back to the READ (Line 

10). 

So . . . the Computer then reads 2 more numbers (17 & 19), prints, and re- 
turns to read the 23 & 12, print and again return. This is where the problem 
is — there are no more numbers to read. 

Fortunately we Atari people have a way around this problem. We need to 
learn a new instruction called TRAP. 



QOOQ 
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Add this line to the program: 

5 TRAP 50 

Now list the program, and run it again. 

LIST 

5 'TRAP 50 

10 READ A,, B 

20 PRINT A: "+"§B? " » " S A-i-B 

30 GOTO 10 

40 DATA 6,8, 17, 19,23, 12 

50 END 

RUN 

6+8 ■ 14 

17+19 <= 36 

23+12 - 35 

READY 

What the TRAP does is to tell the Computer that if any error occurs go to 
the line named by the TRAP statement. Line 5 tells the Computer to branch 
to Line 50 if an error occurs. A neat way out of our problem, but don't for- 
get that any ERROR in the program will spring that trap. 




YOUR TURN 



Make the following changes to the last program: 

Replace the READ with INPUT and delete Line 40 (we don't need DATA 
with INPUT). Add Line 8: 8 PR. "Type in 2 numbers". Change Line 30: 
30 GOTO 8, and delete Line 5. 

O.K. clear the screen and list your program. 



LIST 

8 PRINT "Type in 2 numbers" 

10 INPUT A„B 

20 PRINT A|! " + "; B|i " = " ; A+B 

30 GOTO B 

50 END 

RUN 

T y p e i n 2 n u m b e r s 



The Computer patiently waits at the question mark for you to type some- 
thing in. How many more times will it continue to ask its question? 



That's right — FOREVER. 



You have to out of this program. 
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GOTO vs. IF-THEN 

In the last chapter we learned about the IF-THEN statement, and just now 
we learned the GOTO statement. Both are transfer statements. Instead of 
going on with the next line in the program, transfer statements make the 
Computer branch to a different part of the program. The GOTO is an un- 
conditional transfer. The IF-THEN is a conditional transfer. 



UNCONDITIONAL TRANSFER 



10 INPUT h,,B 
20 PRINT A+B 
::!) (30 TQ 10 
40 END 



This program goes on forever. Transfer is 
made unconditionally from Line 30 to 
Line 10. To stop the run press the 



( BREAK key. 



(30) 





( 


START 


) 








1 






/ 


■ 




INPUT 
A, B 


/ 


/ 


\ 




PRINT 
A + B 


/ 






r 






( 


1 






END 


) 



10) 



(20) 



(40) 



FIGURE 9.1 



CONDITIONAL TRANSFER 


10 INPUT A, B 
20 PRINT A+B 

30 IF A+B < 100 THEM 10 
40 END 

This program continues as long as A + B 
is less than 100. When A+B is not less 
than 100, transfer is made to Line 40 and 
the run stops. 


Q START ) 




! 






• 




(10) / INPUT / 

/ A ' B / 


1 


/ PRINT / 
(2°) / A + B / 


^/^ 1 
(30) <^A + B 


3^\ YES 


- 1 00 J * 
r NO 




(40) ( END ^ 

FIGURE 9.2 
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Take a look at this program: 



MEW 

i& PR I Ml '" Type in 2 number 

20 A = L#W 

30 IF A > 100 THEM 50 

40 PRINT "JUST EI BUT" 

45 GO IT) !0 

50 PRINT "TOO BIG" 

55 SOTO 10 

60 END 



INPUT !....., W 



RUN 

Type in 2 numbers 

JUST RIGHT 

Type in 2 numbers 

TOO BIG 

Type in 2 numbers 



This combination of IF-THEN and GOTO is very common. An IF is usually 
used to do one of 2 things, go to a new line (Line 50) or continue with the 
next line (Line 40). The GOTO then loops back and starts the program 
again. 




EXPERIMENT 



Do you know why Line 45 is included in the program above? The best way to find out is 
to try it. Run the program with Line 45, and without it. Test the program with different 
numbers for L and W. Make sure A>100 once and A< = 100 another time. 
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COUNTERS THAT STOP 



The counters we used earlier were endless. The only way to stop them was 
to press BREAK ! What if the counter is to stop at a specific number? We 
may want to print all the numbers from 1 to 100. 

The solution is to use a counter with an IF-THEN in the program. 



20 COUNT ~ 1 

30 PR. CD UNT 

40 COUNT a COUNT + 1 

50 IF COUNT <= 100 THEN 30 

60 END 



Increment the counter by 1. 

If the counter is less than or equal to 100 continue to loop and 
print, otherwise end the program. 



RUN 



99 
100 



To count by 2's, simply edit Line 40: 

40 COUNT " COUNT + 2 

Now a run will produce the odd numbers 1 through 99 — remember 
COUNT starts at 1. 



JN 



5 



97 
99 



The IF-THEN is very handy in putting a limit on loops. 
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CHALLENGE 



There is an ancient puzzle that goes like this. A King had a problem to be solved and of- 
fered any reasonable payment for the solution. All his wise men tried and failed to solve it. 
Then a peasant offered to solve the problem if he would be paid in the following way. The 
King was to place 1 coin on the first square of a chessboard, 2 coins on the second square, 
4 coins on the third square and so on, doubling the number of coins each time. The King 
agreed to pay and the peasant solved the problem. Write a program that will print the num- 
ber of coins placed on each square of the chessboard. 
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TIME OUT FOR OLD NEWS 



• GOTO will cause the Computer to transfer unconditionally. For 
example GOTO 100 will branch unconditionally to Line 100. 

• IF-THEN is a conditional transfer. It will transfer to a line in the 
program only when its expression is true. 



40 IF A > 100 THEN 30 

50 „ „ „ 



// A is larger than 100 transfer 
to Line 30, otherwise continue at 
Line 50. 



• TRAP is an error trap. When an error occurs in the program, 
TRAP will transfer to the line number in the TRAP statement. 



60 TRAP 99 



// an error occurs, transfer to Line 99. 



Behind every successful Computer, 
there stands a human being. 



1 




1. What will the following programs display? 



a. NEW 

10 K ~ 

20 K - K + 1 

30 PRINT K 

RUN 





b. 


NEW 
1 id Q 
20 P 
30 Q 


f/; 

SI NT Q 

= Q + :l. 






40 G 
RUN 


xro 7<fi 
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c. 



NEW 


d. NEW 


10 DIM N*(25) 


10 NUM » 


20 PR. "What is your name" 


20 PRINT NUM 


30 INPUT N* 


30 NUM = NUM + 


40 PR. "Hello ";N$ 


40 IF NUM <= 10 


50 GOTO 30 


50 END 


60 PR. " GOOD-BYE " ; N* 




RUN 


RUN 



THEN 20 



NEW 



10 


K = 


20 


K = K 


30 


IF K ■ 


40 


PRINT 


50 


END 



4 THEN 20 



K 



RUN 



NEW 

10 TRAP 60 

20 READ A,B 

30 DATA 3,6,8,16,12,24 

40 print A; "+";a; " = " ; B 

50 GOTO 20 

60 PR. "NO MORE DATA" 

RUN 



2. Draw flowcharts for the following: 

a) Exercise lb and Id above. 

b) Exercise 3f(i) below. 

c) Read 3 sets of 4 grades and print the average of each set. 



88 



9-11. 
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3. Write a program to: 

a) Find the average of 5 numbers, over and over again. 



b) Print a count-down from 100 to 1. 
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c) Print the counting numbers from 20 through 500 by 5's. 



d) Modify exercise lb above to print the even numbers 20 and over. 
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e) Modify exercise Id above to print the odd numbers 11 to 27. 



f) Print the numbers of years it will take for the population of rabbits on Block Island to in- 
crease from 2 to 1,000,000? Assume: 



(i) The population doubles each year. 



(ii) The population increases by 50% each year. 
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CHAPTER 10 

HOW HIGH CAN YOU COUNT 



The best way to form a loop is to specify how many times the loop is to be 
done. This is done using a FOR-NEXT loop. For example, suppose we 
want to INPUT A and B, and display A + B three times. 



NEW 



10 


FOR N=l to 3 


15 


INPUT A„B 


20 


PRINT A+B 


25 


NEXT N 


30 


PR. "The 3 problems 


40 


END 



Set up the loop of Lines 10-25. 

The first time through the loop. N=l, 
then N = 2, and finally N=3. Each 
time through we enter two numbers 
and the Computer displays their sum. 



.are done. 





10 FOR . . . 






n 

H 


^^ This is a FOR-NEXT loop. The loop 
starts with the FOR statement and 
ends with the NEXT statement. 






25 NEXT . . ., 
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10-2 



HERE IS WHAT IS GOING ON 



L 



NEW 

10 REM THE EIGHT'S TABLE 

20 FOR L=l TO 9 

30 PR. LS " "; 8 *•!.... 

40 NEXT L 

50 PR. "DONE" 



The loop starts at Line 20 with L — l. 
The Computer then displays in Line 

30 the value of L & 8 times L. 
From Line 40 it goes back to Line 20 

and gets the next L. Now L=2. Then 

1=3,4.5,... 9. 



RUN 


1 


8 


**? 


16 


•— • 


24 


4 


•SfO 


5 


40 


6 


48 


7 


56 


8 


64 


9 


72 


DONE 


retty nifty, 


hey? 



First time through, L = l. 
Second time through loop. L =2. 



Ninth time through loop, L = 9. 
The loop is finished. 





Modify the multiplication table program to display the nine's table. 

HINT: you must modify Line 30. Got it? 

Now one more thing. Modify the program to display the table from 4 
through 7 instead of from 1 through 9. HINT: This time modify Line 20. A 
FOR statement does not have to start with 1 . 



To make a small change in a program line use the editor (and press 
(RETURN )). 
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A DISCOVERY 



What happens if you add a comma at the end of Line 30 of the eight times 
table program? 

30 PR. U " "5 B#L, 




C20 FOR L=l ID 
30 PRINT L; " "?8*L, 
40 NEXT L 
50 PRINT "DOME" 
RUN 



Run the program: you will be 
surprised. 



p 



5 40 

9 : 



.i. t> 

6 48 
DOME 



4 



4 32 



Dft 



8 64 



The entire table is now on three lines. Remember, there are four zones 
across the screen. The comma at the end of Line 30 is a trailing comma. It 
makes the Computer continue to print on the same line until all four zones 
are filled. 

The output looks a little strange doesn't it? You would think the Computer 
could at least line up the numbers, but the Atari has a mind of its own. To 
force it to be neat add this line to the program. 



15 POKE 82,0 



then run the program: 



This command makes sure that each 
line is displayed starting at the 
left edge of the screen. 



<UM 



1 8 
5 40 


2 16 
6 48 


3 24 
7 56 


4 32 
8 64 


9 74 


DOME 







Now replace the trailing comma in Line 30 by a trailing semicolon. 

30 PRINT L; " " ; 8*L; 

RUN Run the program again. 

1 82 163 244 325 406 487 568 649 72D0NE 



The entire table is on one line. But how do you separate the numbers? 
Right — type Line 30 as: 
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30 PR. L3 " ";8*L; " 


p 




LIST 






10 REM THE EIGHT'S ' 


r'ABLE 




15 POKE 82., 






r*-20 FOR L = 1 IU 9 






30 PR. i_; " "s8*Ls " 


II o 

9 


Notice the trailing semicolon changes 


U-40 NEXT L 




the result of the POKE. 


50 PRINT "DONE" 






RUN 






18 2 16 3 24 


4 32 : 


5 40 6 48 


7 56 8 64 9 72 


DONE 





FOR-NEXT-STEP 

Suppose we want to count from 1 to 9 by 2's. The STEP does it. 

10 FOR H~l TO 9 STEP 2 

In this statement M is first 1 then (do you know? — no, not 2!) 3, then 5, 7, 
and 9. M is changing in steps of 2. Let's try it. 



G 



NEW 

10 FOR M=l TO 9 STEP 

20 PRINT MS " "5 

30 NEXT M 



The step is 2. 

A trailing semicolon. 



RUN 

1 3 5 7 9 

So much for the odd numbers; now let's display the even numbers from 20 
down to 10. 



€ 



NEW 

10 FOR Q=20 TO 10 STEP 
20 PR., Q? " "; 
50 NEXT (2 



The step -2 counts down by 2's. 



RUN 

20 18 16 14 12 10 



YOUR TURN 




Fill in the following table. Use the above program to check your answers on 
the Computer. 
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10 FOR 1*5 TO 7 



.0 FOR L=5 TO 7 STEP 1 



1.0 FOR 0=5 TO 9 STEP 5 



10 FOR V=l TO 10 STEP 



10 FOR E=10 TO 51 STEP 10 



10 FOR M=10 TO 5 STEP ~1 



10 FOR Y=10 TO 5 



Counter 
Variables 

1 


Values for 
Counter Variables 

5. 6. 7 














A 


101,102,103,104 


T 


1,1.5,2,2.5,3,3.5 


A 


15,10.5.0.-5.-10 


R 


10,8.6.4.2.0 


1 


.6,.7,.8,.9.1.0 



CHALLENGE 



Study the following program and then answer the questions. This one may be tricky. 




NEW 

10 FOR A=l TO 10 

20 PRINT "BO CARA", 

30 NEXT A 

40 PRINT "MARION TOO" 

50 PRINT "60! (30! GO! " 




97 



will GO CARA be displayed? 



tow many times will MARION TOO be displayed? 



3. How many times will GO! GO! GO! be displayed? . 



4. On how many lines will all the output appear? 



5. Will MARION TOO appear on a separate line? 

6. Will GO! GO! GO! appear on a separate line? 




FUN TIME 

Type in and run the following program. It may give you ideas for other programs. 



NEW 

:l.0 PR. "1 " 

13 PR. "COUNTDOWN" 

IS FOR L=10 TO 1 STEP -1 

20 PR. L 



C: 



16 NEXT PAUSE 

30 NEXT I.... 

35 PR. "#*■**■#*#### BEAST OFF 

C40 FOR PAUSE = 1 TO 200 

41 NEXT PAUSE 

45 PR. " 

46 PR. " •-■••■'■•■'■■• 

47 PR. " ■•'•••"•••-•' 

48 PR. " : : i ■ 

49 PR. " +" 

50 FOR P*l TO 16 
55 PRINT " " 



The brackets help you see the loops better. 

A do-nothing loop. 
It causes a pause. 

#•*•*# •>!• ■*■ ■«■ -if * * " 



60 FOR PAUSE=1 TO 200 

61 NEXT PAUSE 
65 NEXT P 

70 PR. "BONE" 



The two loops are nested. 
They are inside each other. 



Did you run the program? 
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Not bad huh? We learned two new ways to use loops: 

1. The loops of Lines 25-26, 40-41, and 60-61 are do-nothing loops. They slow 
down the display on the screen. 

2. Loops may be placed within loops. For examle, the do-nothing loop of Lines 25-26 
is inside the outer loop of Lines 15-30. The two loops are nested loops. Nested 
loops must have different counter variables names. The names of the counter vari- 
ables of these two loops are PAUSE and L. 

The counter variable of the outer loop of Lines 15-30 is? 



The counter variable of the inner loop of Lines 25-26 is ? 



Is the loop of Lines 40-41 nested? 




Does the program contain more nested loops? 



s\ 



/ \«0" 




LOOPS THAT SUM UP 

We now write a program to add up all the numbers from 1 to 100. We 
want the sum of 1 + 2 + 3 + 4 + ... +98 + 99 + 100. 

To start off we'll find the sum of 1+2 + 3 + 4 + 5. 




SUM s 









The sum starts out as zero. 


BUM = 


SUM+1. = 


0+1 


= 1 


1 1 to the sum. 


SUM = 


• SUM+2 «b 


1 +2 


::::: 3 


We add 2 to the sum. Now the sum equals 3 


SUM = 


-- SUM-i-3 « 


3+3 


f< 




SUM :: 


■■ SUM+4 = 


6+4 


■ 1 




SUM » 


■■ SUM+5 ;:::: 


10+S 


« 15 


The final answer is 15. 



We can write this process as: 



JM 



BUM + N 



with N= 1. then 2. then 3. then 4. then 5. 



The new value of SUM equals the old value of SUM plus N. 
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MEW 
10 REM 



SUM OF NUMBERS 



15 



=0 



C20 
30 



10 FOE N=i TO 



= S 



N 



40 NEXT I' 
50 RE,. S 
RUN 
15 



The sum S starts out at zero. 

Set up a loop. 

Calculate a new value for S. 

End of the loop. 

Display the sum S. 

The sum of the numbers 1 through 5 is 15. 



Variable S is the sum. In Line 15 we start the sum at zero. Then the loop of 
Lines 20-40 gives N the values 1, 2, 3, 4, and 5. In Line 30 the sum S is 
computed as the previous value of S plus N. 

To find the sum of the numbers 1-100, we edit Line 20 and run the 
program. 



20 FOR N=l TO 100 

RUN 

5050 



Edit the line; now N goes to 100. 



The sum of the numbers 1 to 100 is 5050. 



What is the sum of the numbers 1 through 1000? 
That's right, the sum is 500,500. 




IF - THEN AGAIN 

I have an interesting question for you. How many numbers must we add up 
until the sum is just over 100? 

Here we go! 

NEW 

10 REM 1+2+3+...? > 100 

20 S-0 : K>0 

30 K=K+1 

40 S*S+K 

50 IF S <= 100 THEN 30 

60 PR. "THE SUM OF THE NUMBERS 1 - ";K;" IS " ; S 



RUN 

THE SUM OF THE NUMBERS 1 



14 IS 105 



100 



i - 9. 



Let's play Computer and go step-by-step through the program. 



Program line 
NUMBER 




Value of 
COUNTER K 





Value of 
SUMS 

— HM— ■ 



20 







30 




0+1=1 


40 




J. 


50 
3 


transfer to Line 30 


1 + 1=2 


40 




'".* 


!-,(,) 


transfer to Line 30 




30 




2+1=3 


4 




3 


50 


transfer to Line 30 




30 




3+1=4 


40 




4 


50 


transfer to Line 30 




and so on 






3 




13+1=14 


40 




1 4 


50 


transfer to Line 60 i 


since sum S is greater than 100 


60 


display results. 








0+1 = 1 

1 



6 
-4=10 



91 
91+14=105 



The IF-THEN statement of Line 50 is a conditional transfer. As long as the 
sum S is not greater than 100 we transfer to Line 30. At Line 30, K is in- 
creased by 1 and at Line 40 the new sum is equal to the old sum plus K. 
Once the sum S is greater than 100, the results are displayed at Line 60. 




THE TWELVE DAYS OF CHRISTMAS 

This famous song goes like this: On the first day of Christmas my true love 
gave to me a partridge in a pear tree. On the second day of Christmas my 
true love gave to me two turtle doves, and a partridge in a pear tree. On 
the third day of . . . and so on for twelve days. 

How many gifts were given on the twelfth day? HINT: Use a FOR-NEXT 
loop and notice that on the first day one gift was given, on the second day 
1+2 (or 3) gifts, on the third 1+2 + 3 (or 6) gifts, and so on. 
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NEW 

10 REN THE TWELVE DAYS OE CHE I SIN AS 

20 B=0 Start off gifts G = 0. 

30 PR .. " DAY " ,, " B I FT S " Print column headings. 

40 FOR D=l TO 12 

50 B * 6-i-D 

60 PR. D,, 

-70 IMEX T D Continue looping as long as D<12. 

S0 END 



How many gifts do you think were given on the twelfth day? Run the pro- 
gram and find out. 



TIME OUT FOR OLD NEWS 



• The FOR and NEXT statements are used to form loops. The 
loop starts with a FOR statement and ends with a NEXT 
statement. 



1.0 FOE 
20 



K=A TO B STEP C 



BODY OF THE LOOP 



30 

40 NEXT H 



• K is the counter variable 

• A is the first value of the counter variable 

• B is the upper limit of the counter variable 

• C is the step value of the counter variable 

• FOR K=10 TO 100 STEP 20 will result in K=10, 30, 50, 70, 
90. 

• A loop without a body is a do-nothing loop. It can be used to 
slow down the display on the screen. For example: 



C 



10 PR. "START" 

20 FDR PAUSED 1 TO 200 

30 NEXT PAUSE 

40 PRINT "FINISH" 
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The word START is displayed first. Then after a short pause the 
word FINISH will appear on the screen. 

• A trailing semicolon or a trailing comma at the end of a PRINT 
statement will cause the next PRINT statement to display on the 
same line. The following three PRINT statements will display on 
one line. 

1@ PR. "JACK " ; 
26 PR. "and " ; 
38 PR. "JILL" 

• Nested loops are loops within loops 



1.0 FDR 11=1 

20 ..,„.. 

30 FOR P~3 

40 . ., . „ 

50 NEXT P 

60 „„,.,. 

70 NEXT M 



TO 10 



J 7 



INNER 
LOOP 



OUTER 
LOOP 



Brackets show off the loops. Brackets of good nested loops can- 
not cross: 



E 



Good Nested Loops 



Bad Nested Loops 



• A good way to check out a program is to play Computer. Go 
through the program step by step and write down the results. 
This method is especially useful when you are trying to under- 
stand a program. 

• The statement S = S + 1 means: 

The new value of S is the old value of S plus 1. 

• When using a sum or a counter always give it a starting value 
before the loop. For example: 



NEW 

10 S=0 

20 FOR K=l TO 100 

30 S=S+K 

40 NEXT K 

50 PRINT "SUN = "5S 

60 END 



S has the starting value 0. 
The loop starts. 

The loop ends. 
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1. What will the following programs display? 



a. MEW 

C10 FOR M=l TO 
20 PR. "*##**' 
■30 NEXT 1-1 



b. NEW 

10 FOR M=4 TO STEP 
20 PR. N; " "5 
L-30 NEXT N 



RUN 



RUN 



c. NEW 

CI® FOR R«5 TO 8 
20 PRINT R,R*R 
30 NEXT R 
RUN 



2. What display will this program produce? 



c 



NEW 

1.0 FOR K»i TO 3 

20 PR. "ROW "; 

30 NEXT K 

40 PR I NT "YOUR BOAT' 

RUN 
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3. Write programs to produce the following displays. 



a. ■*■** 



### 



##* 



##* 



•*#•* 



**# 



b. 1 



:l. l 

4 8 

9 27 

16 6* 



NEW 

10 REM STARS AND DASHES 



NEW 

10 REM TABLE OF SQUARES & CUBES 



20, 



4. Play Computer and complete the table for the program. 



NEW 

10 REM NESTED LOOPS 

20 FOR K=l TO 3 

30 FOR L=4 TO 5 

40 PR. K»L»K*L 

50 NEXT L : NEXT K 



K 


L 


K*L 


l 


4 


4 


1 


5 


5 


4& 


4 




'".'-*' 



















5. Write short programs to perform the following. Write these programs with an IF-THEN loop 
and then with a FOR-NEXT loop, 
a. Display all the odd numbers 1, 3, 5, . . . ,19. 
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b. Display all fractions 1/3, 1/4, 1/5 1/10 in decimal form. 



6. Modify the Christmas program to compute and display the total number of gifts given over 
the twelve days. 



Do you remember the challenge in chapter 9 about the King and his problem? Change the 
program to display the total number of coins paid to the peasant. 
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CHAPTER 11 

SURPRISE NUMBERS 



When you flip a coin the toss is either heads or tails. When you toss a die 
(one half of a pair of dice) the outcome is either a 1, 2, 3, 4. 5, or a 6. 
These outcomes cannot be predicted. 

The RaNDom number function RND causes the Computer to pick a "sur- 
prise" number. It is random; it is not predictable. RND(O) gives a number 
less than 1, and greater than or equal to 0. That means the number is a 
decimal less than 1. Try this: 



PR. RND(0) 

0. 12333679: 



The Computer's response. 



If you do it 3 more times you'll get 3 different numbers: 



PR. RND<0> 
i:)„ 6681 213378 
PR. RND<0) 

PR. RND<0) 
0, 3979949951 



BRAIN FOOD 



The function RND(O) gives a number from to 0.9999999999. It may equal but it 
never equals 1. 
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You can also produce decimal numbers that are not between and 1. 

Write a statement to produce a random number between 7 and 8. We start 
at 7 by adding it to RND(O). 



, •*• X "*" &L 



PR,, RND<0)+7 
7 . 5632447881 



A random number between 7 and 8. 



What do you think will happen if you add, say, 3 to the RND(O)? Try this: 



c 



10 FOR TRY=1 TO 10 

20 PR,, RND(0)+3 
30 NEXT TRY 

RDM 

3„ 7431 182825 
3„ 4858398431 
3.. 3273010296 



Add 3 to each random number. 



All 10 random numbers are between 3 and 4. 
They are all different. 



3 ,,6084594738 
3„ 1936492952 
3, 323 3 SS2073 
.:' 6960/54 s9D 
3. 1949157732 
.3 1892359623 



Let's try multiplying RND(O) by 7. Edit Line 20 above and list the program. 



c 



LIST 

10 FOR TRY = 1 TO 10 

20 F-R„ 7*RIMD (0) 

30 NEXT TRY 

RUN 

5 « 43 769024 IS 

3. 6521366907 

1 „ 8052720882 

f , 2591 13 7096 

4„ 9970634658 

7. 36 / "?S0 75i:;.'4 

6„ 4775089903 

2„ 1146290053 

1 „ 6680332578 

5„ 7904543274 



Multiply each random number by 7. 

Now run the program. 

All 10 numbers are between and 7. 



How about ten random numbers between 3 and 11? Again edit Line 20: 



20 PR. O&RND(0)+ 



Add 3 so the random numbers start at 3. The dif- 
ference 11-3 is 8. So multiply RND(O) by 8. 
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4 , 9907226576 
4„ 5985107449 
5„ 9635009738 
5„ 18725585:1 4 



All 10 random numbers are between 3 and 11. 



11-3. 



6. 1 795654298 
8„ 6267089815 
3. 7490234382 
7. 648437509 
10. 240966795: 



Note ending O's are not displayed. 





CHECKPOINT 



For each statement determine the smallest and largest possible random number. 



R, 10#RND (0) +0 




LARGEST NUMBER 

9.9999999999 






RR„ 10*RI ID (0 > -lb 



RR 1 0*RND (03 +li : ) 



PR. 20*RND (0) +4 



RR. 2*RND < ) +5 



One more thing, how about getting rid of the decimals. To do that we need 
to learn something new, the INTeger function. The INT function, INT( ), 
takes the number in parentheses and changes it to the next smaller integer. 



PR I NT 

4 



INT (4.6) „ INT ( 1 ,. 1 ) 



For positive numbers in the parentheses, the INT(n) function truncates the 
number n, that means it chops off the digits beyond the decimal. 



T/i 



INT(A) 



The INT function 



Its argument 
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.1 1-4 



EXPERIMENT 



The argument in the parentheses INT( ) may be a number or an expression. 



PRINT INT (3. 14) 



PRINT INT (10*2,. 54) 



PRINT INT (11/3) 



3 is the largest integer (whole number) not larger than 
3.14. 



To the nearest centimeter, 10 inches equal 25 centimeters. 
Here the argument is an expression. 



M is and 1NT(0) equals 0. 

The argument is again an expression. 




Try to figure out the outcome of each statement. 



PR, INT (5.. 2) 



NT (7„ 9) 



PR. INT (0.7) 



PR, INT Cfe-* .. B'i 



PR,, INT (7/2) 



PR,, INT" (5/2+2. h) 



Now let's combine RND(O) and INT(n): 



PR,, INT (RND (0) ) 





INT of a number between and 1 is zero. 
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F ; 'R.. INT (RND (0) ) +1 



+1 = 1. 



PR. INT (8*RND(0) ) 



INT of a number between and 8 is a number in 
the range 0, 1.2. . . .7. 



To produce a random whole number between 1 and 8 type: 



PR. INTf8*RND (0) ) +1 



This is a little tough, so let's take a close look at it. 






STATEMENT 

RND (0) 

8*RND (0) 

INT (S*RIMD (0) ) 

INT <8*RND (0) )+:l. 




YOUR TURN 



Fill in the blanks: 



PR. INI ( 10*RND (0) ) 



PR. IMT(15*RND(0) ) 



PR. INT (20*RND (0) ) 



PR. INTCI.0*RND (0) )+l 



PR. IMT(20*RMD C0) )+:l. 



PR. INT (15*RND<0) ) +6 



PR. INT(18*RND(0) ) +3 



PR. INT (7*RND (0) )+l 



THESE NUMBERS 







SMALLEST NUMBER 



0, 1 

.1. ., 2 



. 0„ 9999999999 
. 7i 9999999999 

•.:'• , 4 . b K a , / n 8 




LARGEST NUMBER 



14 



10 



in 



il-G 



The Computer can display random numbers in any range. We can use the 
Computer to toss a coin. Let's say a 1 is heads and a 2 is tails. 



PRINT INT(2*RND(0) ) +1 



The Computer "tossed" tails. 



Let's repeat this 10 times. The Computer will toss a coin 10 times. 



c 



NEW 

10 FOR IT =i TO .1.0 

20 l-R„ IN "i ( i?#RND ( iO) ) -i-l ; " 

30 NEXT N 

RUN 

1 2 1 1 2 :l. 1 1 : 

RUN 



Display a random number, a I or a 2. 

Ten tosses arc displayed. 

Ten more tosses are displayed. 



Notice that the sequence of heads (l's) and tails (2's) is different in the two 
runs. They are random. 

That sure is a fast way to flip a coin 10 times. Can you change Line 10 to 
toss the coin 100 times instead of 10 times.? 



1 



That's right. 10 FOR M = 1 TO 100 




CHALLENGE 

Modify the coin tossing program to throw a die 10 times. 
(A die is half a pair of dice.) 



20 



In the following program a pair of dice are thrown 10 times. 

The first die is tossed in Line 23. The second die is tossed in Line 26. In Line 30 the out- 
come of each die and their sum is displayed. Fill in the blanks. 
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NEW 

•20 FOR M=I TO 10 
23 X=INT (6*RND<0> )+l 



..•_& Y = 



30 PR 



•40 NEXT M 




EXPERIMENT 




We again randomly produce l's and 2's. Instead of calling them heads and tails, we 
display a plus for a 1 and a minus for a 2. 



10 PR. " *) " 

*»20 FOR K= 1 TO 8 

r— 25 FDR L= 1 TO 10 

30 IF INT <2*RND (03 ) +1' 

35 PR,, " + "J 

40 GO TO 50 

45 PR. "--"; 

-50 NEXT L 

55 PR. 

-60 NEXT K 

RUN 



2 THEN 45 

The random number is 1. 

The random number is 2. 

A blank PRINT to finish the line being used for 
the display. 



--M -H 1- 

+--I-H I I- 

•+■■--■+ I--1 1-I- 

— +++H I 

+ -i I !•!■•- 

— + M— I--I- + 

1- + + + _... |...._ 

+ + __. + 1. )..+ 



Type in the program. Each time you run the program the display is different. This is be- 
cause the numbers are random. 
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Now change the symbols: $'s for l's and blanks for 2's. (PR. ' "; displays a blank space.) 
Experiment with other symbols. You can also change the size of the pattern by modifying 
the FOR statements of Lines 20 and 25. And one more thing; change Line 30. 

3 I F I N T ( 5 # R N D < ) ) + :l. ~ 2 T H E N 4 5 

Now there are more blanks than $'s in the pattern. Why? 





FUN WITH THE FORTUNE WHEEL 



The RND function is used to play this game. A wheel has six lucky numbers. The wheel 
spins and stops at any number from 1 through 6. Can you guess the lucky number? 



NEW 

10 PR., " * " 

1 5 P R „ " Y O U R I.... U C K Y N U II B E R I S " I 

20 INPUT G 
25 PF 




C30 FOR A« 
35 NEXT A 



"THE WHEEL. IS SPINNING" 
1 TD 50 



5 NEXT A 
40 L= INT (6*RMD (0) ) +1 
45 IF L=S THEN 60 

50 PR. "THE LUCKY NUMBER IS "5LJ 
55 GOTO 65 

60 PR,, " THE LUCKY NUMBER IS "SL 
6 5 P R „ " T P L AY A 6 A I N T Y P E : ' R U N : ' 
70 END 



YOU DID NOT 
YOU GOT IT 



HAVE IT" 
YOU SOT IT ! " 




Run the program 18 times. Only one number out of six is the lucky number. Therefore, 
you expect three guesses out of the eighteen guesses to be right on. (Get it? 3 x 6 = 18.) 
How many lucky numbers did you guess correctly? 
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4. J* **~ t*J 




FORTUNE WHEEL 



i 



SPIN 
NUMBER 



10 



11 



12 



13 



14 



15 



16 



17 



18 



MY 
GUESS 



LUCKY 
NUMBER 



HIT/MISS 



D 



2 



MISS 



HIT 



RESULTS: I HIT 



TIMES OUT OF 18 SPINS. 



115 



A DISCOVERY 

INT(3*RND(0)) + 1 gives either a 1, 2, or 3. If the numbers are really 
random, then each of these numbers is likely to come up 1 out of 3 
times. If we repeat it 60 times, then we expect the three numbers to 
occur 20 times each. Also, the average of the numbers 1, 2, and 3 is 
2. Remember how to find the average of three tests? Add up the scores 
and divide by 3. 



.11-10 



MEW 

10 FOR IOi TO 60 

15 REM BE ME RATE A RANDOM NUMBER 
20 R= INT (3*RND (0) ) +1 
22 REM ADD UP THE RANDOM NUMBERS 
25 5=S+R 

28 REM TEST THE RANDOM NUMBER 
30 IF X=3 THEN 60 
35 IF X=2 THEN 50 
38 REM COUNT ONE'S 
40 A'i=Al + l 
45 BO TO 65 
48 REM COUNT TWO'S 
50 A 2 ™-A 2 -i-l 
55 SO TO 65 
58 REM COUNT THREE'S 
60 A3-A3+1 
-65 NEXT K 

70 PR . " ONE : ' S " , ! ' TWO ; ' S " , " THREE ' S " 
75 PR. Al , A2,, A3 

80 PR. "THE AVERABE OF ALL 60 NUMBERS IS 
85 END 



■i b / c> k) 



RUN 

ONES TWOS THREES 

1 7 1 7 26 

THE AVERABE OF A EL 60 NUMBERS IS 2„ 15 



Not bad! The average is very close to the expected value of 2. Try it 
yourself. You'll discover that the results are different for each run, but 
not very different. 
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Run the program five times and fill in the table. 



RUN NUMBER 



ONE'S 



TWO'S 



THREE'S 



AVERAGE 



17 



TOTAL 



Now let's change Line 10 to 



10 FOR K=l TO 300 



Then we also change Line 80 (fill in): 



80 



17 



26 



2.15 



AVERAGE 



Run the modified program five times. Is the average now closer to 2 than in 
the above table? Why? 



How much dirt is there in a hole 
2' long, 3' wide, 4' deep? 

Answer: There's no dirt in a hole! 
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TIME OUT FOR OLD NEWS 

• The RND function produces random numbers. 

• RND(O) produces a random number between and 1. It may 
equal but never 1. 



PR- RND<0) 

0.4512349B09 



The INT function truncates positive numbers. 



PR. INK 7 .93) 



Using INT and RND(O) together produces random whole 
numbers. 



PR, INT (8*RND (0) ) +4 Produces a random number in the 
7 range 4, 5,6 11. 
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1. Write BASIC statements to: 



a. toss a coin 



b. roll a die 



c. display the total of two dice 



2. Write BASIC statements to pick a number within the following ranges: 

a. through 5 

b. 1 through 6 

c. 1 through 100 

d. 5 through 20 

e. 7 through 8 

f. through 2 



3. Write a program to toss a coin 8 times and display the sequence of HEADS and TAILS. For 
example, the output may be: 



HEADS TAILS TAILS TAILS 

TAILS HEADS HEADS TAILS 
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4. Write a program to toss 4 darts. A bull's eye is worth 50 
points, and the other two areas on the board are worth 
20 and 5 points. Keep track of your score. 

Challenge a friend. 




5. Write a program that asks you to predict the outcome of 5 throws of 2 dice. Each time you 
guess correctly, you get 50 points. Keep track of your score. 
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CHAPTER 12 

A RAINBOW OF LETTERS 



Computers are known for their ability to compute rapidly and accurately. 
The ATARI 400/800 series of Home Computers can also be very artistic and 
very colorful. 

In this chapter we will learn about graphics modes 0, 1, and 2. The next 
chapter will discuss graphics modes 3 through 8, these modes are used to 
draw. 

POSITION — MODE 

When the Computer is powered up it is automatically in graphics mode 
(GR.0). 

In graphics mode the screen is 40 characters wide and 24 high. The 960 
(40 x 24) positions on the screen are located by using the correct combi- 
nations of numbers for the coordinates. Coordinates are a pair of numbers 
used to locate positions in Mathematics, Science, and Computer Program- 
ming. The origin, or beginning point, is called 0,0. For the ATARI Home 
Computer that is the corner of the screen — the upper left corner. The coor- 
dinates of the four corners of the screen for graphics mode are: 




Y 
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^Tc^ 


















■ 










































































L 0,23 


39,23 , 



GRAPHICS MODE 



In graphics mode the screen is 40 characters wide 
and 24 characters high. 






Let's print HELLO on the screen — and put it in the center of the screen. 
But where is the center? The center should be 20 horizontal blocks and 12 
vertical blocks from the upper left corner of the screen. 

The actual coordinates of the center are 19,11. Remember the ATARI Home 
Computer, like most Computers, starts counting at zero. That makes all the 
position numbers 1 less than what most people think they are. 



























39,0 






rCENTERATl 






1 









0,23 


















: 






: .;..;. | , j 



: 



I 






39,23 




To place the first L at the center, the Computer needs to POSITION the H 
over 17 and down 11 (from the upper left corner). To do this, type: 



POSITION 17,, 1 :l. 
PR. " HELLO" 



This places the cursor 17 over & 11 down. It will 
start to print there. 
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POSITION 17,11 can be abbreviated as POS. 17,11. 



BRAIN FOOD" 



POSITION just moves the cursor to a position, it does not display anything. Graphics 
mode is 40 print positions wide and 24 positions high. 



POS. X,Y 








how far over 
horizontal 
position 






how far down — 
vertical 
position 



The origin is the upper left corner of the screen. Its coordinates are 0,0. 

ORIGIN 



0,0 



XOVER 



YDOWN 



POS.X.Y 



X and Y are the coordinates of the POSITION X,Y instruction. 



The first POSITION number counts the number of columns from the left of 
the screen. 



POS. ; , 10 
POS. :l. „ .1.0 



The Computer uses the left most column. 
The first column in from the left. 



The second POSITION number counts the number of rows from the top of 
the screen. 

Any character in the top row of the screen has a second number of 0. 



PUS. 4,0 
POS, 4,8 



The Computer uses the top row. 
The eighth row down from the top. 
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CHECKPOINT 




Fill in the blanks in the following table: 



■ 



STATEMENT 



mnmrnmHii 



# COLUMNS FROM THE LEFT 



# ROWS FROM THE TOP 



POS. 4,6 



SIX 



pos. a, ib 



fifteen 



POS 



:0 , 1 



POS. 



? 4 



nine 



POJ 



fifteen 



POE3„ 38, 



one 



POS. 



thirty 



twenty-two 



Try all the statements on the Computer. Don't forget to PRINT something at each position, 
for example POS. 4,6 : PR. "A" 

Let's draw a line: 



NEW 

1.0 FOR Y«3 TO 21 
20 POS. 7,Y 
30 PR. "#" 
-40 NEXT Y 



The vertical position varies from 3 to 21. 
Place the marker over 7 and down Y. 
Print a *. 
A vertical line. 



YOUR TURN 



1. Display stars at positions (10,15) - (16,15) - (10,21) - and (16,21) 




124 



12-5 



2. Draw a horizontal line of # characters on the 5th row. 



3. Draw a vertical line of $ characters in the 20th column. 



GRAPHICS MODES 1 AND 2 

Graphics modes 1 and 2 are known as text modes, they can display the al- 
phabet and numbers only. Graphics modes 1 and 2 do not display the spe- 
cial graphics characters. 

To shift into graphics mode 1, type: 

BR .. 1 This is the abbreviation for GRAPHICS 1. 
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The screen will become black. This is the graphics window. A blue area at 
the bottom will light up. This is the text window. In GRAPHICS 1, the 
PRINT statement displays in the text window. Type: 



PR. 



'HELLO' 



The Computer responds: 



graphics window 



text window (in blue) 




So . . . how can we display in the graphics window? Change the PR. 
"HELLO" to: 



PR,, #6; "HELLO" 



The Computer responds: 



The #6 is a code (or the Computer. 

It means PRINT in the graphics window. 



graphics window 
(in orange) 



text window (in blue) 




Did you notice the color (orange) and the print size? Graphics mode 1 dis- 
plays everything in the graphics window in double width. 

Neat, isn't it? 
126 
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Even better — orange isn't the only color that can be used. Type: 



The Computer responds: 



graphics window 
(in light green) 



text window (in blue) 




HELLO is in light green. But notice the characters are still double width cap- 
ital letters. To change the color from orange to green switch the print style 
from upper case to lower case in the quotation marks after the PR.#6;. 

Using print with inverse letters will also change the color of the display. In- 
verse letters are dark on a light background in graphics mode 0. In GR. 1 
and GR. 2 the displayed letters are dark blue for inverse upper case and red 
for inverse lower case. 

Remember, to get inverse letters press the Atari symbol: 



'BRAIN FOOD' 



To change the color of the characters in GR.l and GR.2 switch from upper case to 
lower case, from lower case to upper case, from regular print to inverse, or from in- 
verse to regular print. The color is selected by the style of the letter in the quotes. 
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EXPERIMENT 



For some practice in color, type the following program. 

NEW 

10 GR. 1 : DIM N$(10> 

20 PR. "WHAT IS YOUR FIRST NAME"; 

25 I.N* 

PR. #6; "HAVE All " 

PR. #6; "good day " 

PR.#6?N* 



30 
40 
50 
RUN 



To practice GR. 2 , edit Line 10: 



10 


GR. 


*? " 


DIM 


NSC 10) 


LIST 








10 


GR. 


O ■ 


DIM 


N*<10) 


20 


PR. 


"WHAT IS 


YOUR NAME"; 


25 


I. 


N$ 






30 


PR. 


#6; 


"HAVE 


A " 


40 
50 


PR. 

PR. 


#6; 
#&; 


"good 
N$ 


day " 



The difference between the graphics modes 1 and 2 is the height of the 
characters. GR.2 displays its letters and numbers twice as tall as modes 
and 1, but keeping the width of GR.l. That makes GR.2 characters double 
wide and double tall. 



n 



POSITION - MODE 1 

The coordinate system of GR.l is not as wide as in mode 0. Each character 
displayed is double the width of those in GR.O. That means there are half 
the positions across the screen - 20. There are still 24 rows, but the last 4 
are used by the text window. The screen's corner coordinates are: 
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^0,0 


graphics window 


19.0A 


0,19 




19,19 


0,20 




19,20 


L0,23 


text window 


19,23 V 



GRAPHICS MODE 1 



The graphics window is 20 lines high. 



The text window is 4 lines high. 



A POSITION instruction before a PRINT#6; will display the first character 
of the PRINT at the given coordinate. If the coordinate falls in the text win- 
dow, the PRINTed word will not be seen. The text window hides it. 

The text window can be eliminated in graphics mode 1 by typing GR.l + 16 
(or GR.17) in place of GR.l. But be careful, when the Computer has fin- 
ished a program and prints READY it needs a text window. To overcome 
this problem don't use END in the program, use a GOTO as in Line 40 
below. 



EXPERIMENT 



Let's display a * in the center of the screen in graphics mode 1. 



NEW 

.1.0 BR. 1 + 16 

20 P0S.9, 11 

30 PR. #68 "*" 
40 B. 40 

RUN 




No text window. 

Place a marker at the screen's center. 

Display a * at the marker. 

Don't print READY. A trick - the Computer loops on itself. 



Modify this program to print a * above and below the * in the program. 



if 



\ 



ii 



129 



I 



12-1 o 

11 



2. Again modify the program to print a » to the left and the right of the * displayed on the 



screen. 



POSITION - MODE 2 



In graphics mode 2, the graphics screen is 20 columns wide and 12 rows 
high. The last 2 rows are used by the text window. As in GR.l, the text 
window can be eliminated by using GR.2 + 16 (or GR.18) instead of GR.2. 
The screen's coordinates are: 



^0,0 


graphics window 


19,0^ 


0,9 




19,9 


0,10 




19,10 


.0,11 


text window 


19,11 j 



GRAPHICS MODE 2 



The graphics window is 10 lines high. 



The text window is 2 lines high. 
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CHALLENGE 




MEW 

10 6F\'„2 Double size characters. 

20 FOR DOT = : TO 9 Change the PRINTing positions. 

3 & P S „ D T , D T : P R .#65" # ' ' 

40 POS„ 19 DOT,, DOT : PR. #6; "%"i9-DOf is <tn expression. 

50 |\|„DOT • It is used for the first coordinate of POS.. When 

60 END DOT is 9, 19-DOT is 10. 

RUM 



Not bad, a V of #'s. It's fun to display different patterns. 

How can the program be changed to display the 2 halves of the V in two different colors? 



TIME OUT FOR OLD NEWS 

• POSITION places the cursor at any position on the screen. 

• GRAPHICS is all text window - 40 columns by 24 rows. 

• GRAPHICS 1 displays capital letters in its graphics window - 
twice the width of letters in graphics mode 0. 

• GR. 1 has a graphics window 20 columns by 20 rows and a text 
window 20 columns by 4 rows. 

• GRAPHICS 2 displays capital letters in its graphics window - 
twice the width and twice the height as those in graphics mode 
0. 

• GR. 2 has a graphics window 20 columns by 10 rows and a text 
window 20 columns by 2 rows. 
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•*• ***** *1* ***** 



• Both GR.l and GR.2 can display capital letters and numbers in 




4 different colors: 




STYLE OF CHARACTER COLOR DISPLAYED 




upper case letters & numbers orange 




lower case letters light green 




inverse upper case letters 




& inverse numbers dark blue 




inverse lower case letters red 




• PRINT#6; will display characters in the graphics window in GR. 




1 &2. 




• PRINT will always display characters in the text window. 






1. Complete the following table with the expected results. Check your answers on the Computer. 




PR. " ^| " 



b. POS. 9„9 :: PR,, "HI " 



c. POS,. 9„ 9 I; PR. " 



d. GR., & : PR. "HI 



e. BR. 1 :: PR- "HI 



f. BR. 2 ! PR., "HI" 



g- BR. 1 : PR.#65"H 



nut ii 



h. GR.2 ; PR. #63 "hi 
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2. For each of the following give the coordinates of the 4 corners of the screen, the graphics window 
and text window. 



CORNERS OF 
ENTIRE SCREEN 





CORNERS OF 
GRAPHICS WINDOW 



CORNERS OF 
TEXT WINDOW 



a- BR.0 



b. BR. :i 



c. BR. ,2 



d. 



e. BR. 18 



3. How do you change the colors of the characters in GR.l and GR.2? 
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4. How is the text window eliminated in GR.2? 



5. Show the output for the following programs: 



NEW 

10 PR. " ^ " 

20 FOR A=l TO 200 

25 NEXT A 

30 POS.9,7 

40 PR. "DAIMBER AHEAD" 

50 GOTO 10 



b... NEW 

10 BR. 1 

20 PR. "HELLO" 

25 F„ A=l TO 500 : N. A 

3 P S .. 6 , 3 I; P R . # 6 \ " H E L... L D ' ' 

40 F. A=i TO 500 : N.A :: GR. 

5 P S . 6 „ 3 :: P R . #6 ? " H E I... I.... ' ' 

60 END 



6. Change the programs in #5 above to do the following: 

a. Have the display stay on the screen for double the time allowed in exercise 5(a) 



b. Print HELLO in the text window, GRAPHICS 1, then GOODBYE in the graphics window. 
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CHAPTER 13 

COLOR ME PURPLE 



Chapter 12 explored the three graphics modes, 0, 1, and 2. They make 
printing artistic. The other 9 graphics modes, numbered 3 through 11, are 
used to draw. In this chapter we explain graphics modes 3 through 8. 

GRAPHICS MODES 4 AND 6 

Graphics modes 4 and 6 are two-color modes. The display characters are in 
one color and the background can also be only one color. This is not as 
colorful as some other modes, but it requires less memory. That may be im- 
portant if the program is long. 



'o.O 


graphics 
window 


79,0^ 


0,39 




79,39 


0,40 


text 

window 


79,40 


\0A7 




79,47^ 



GRAPHICS MODE 4 
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0,0 



0,79 



0,80 
0,95 



graphics 
window 



text 

window 



159,0 



159,79 



159,80 
159,95, 



X W JU_ 



GRAPHICS MODE 6 




These are the corner coordinates of graphics 
mode 6. GR.6 has a graphics window of 160 col- 
umns by 80 rows. It also has a text window in the 
last 16 rows of the screen. 






The difference between GR.4 and GR.6 is the size of the pixel it can light 
up. A pixel is the smallest block of light a graphics mode can produce. 



YOUR TURN 




Run this program on the Computer. It will change back and forth between 
modes 4 and 6. 



NEW 

10 BR. 4 :: C. :l. 

20 Pi „ @, : F-i '9„ 

30 Pi 0,39 :: PI 79, 39 

40 F,P=1 TO 500 : N.P 
50 BR. 6 :: C. :l. 

o0 PI tv„ *; : :: PL. /9„ 

70 PL,, 0,39 :: PL. 79,39 
B0 F - P» 1 i *300 ". N P 
9 G n 1 



Graphics mode 4. color 1. 

Light the corner pixels of graphics mode 4. 

Pause a second. 

Change to mode 6. 

Light the same pixels as above. 

Pause a second. 
Return to mode 4. 



Do the lit pixels stay in the same positions in both modes? 



Which graphics mode has a smaller pixel, GR.4 or GR.6? Of course, GR.6. 

The row and column size tells you how many pixels fit on the screen. The 
more pixels the screen can contain, the smaller the pixels must be. The 
smaller pixel can draw a thinner line. So if you are using the Computer to 
draw lines, GR.4 will quickly cover the screen, while GR.6 can produce finer 
quality pictures. 
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CHECKPOINT 



1. What graphics command will eliminate the text window in GR.4? 



GR.6? 



2. What are the coordinates for the position at the upper left of the screen? 



3. In GR.4, along the top edge of the screen Y : 



and X varies from 



to 



X means columns (across) and Y means rows (down) 



4. In GR.6, along the top edge of the screen Y = 



and X varies from 



to 



5. In GR.4, at the right edge of the screen X = 



and Y varies from 



to 



6. In GR.6, at the right edge of the screen X : 



and Y varies from 



to 



7. In GR.4, how many print positions are there along X? 



along Y? 



8. In GR.6, how many print positions are there along X? 



along Y? 
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To light up a pixel on the screen two things must happen: the Computer 
must know what COLOR to use and where the pixel is to appear on the 
screen. The COLOR command specifies the color to be used. In the two- 
color modes COLOR 1 (or C.l) picks the color. Before any drawing is to be 
done a COLOR command must be executed. Then use PLOT X,Y (or 
PL.X,Y) to light up a pixel at position X,Y 

Try it. 
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NEW 

10 GRAPHICS 4 

20 COLOR 1 

30 PLOT 60,, 30 
RUN 



Use mode 4. 

Select color 1 (orange). 

Move across 60 and down 30. 



This program lights a pixel at X = 60, Y = 30. 





^ 


PLOT X,Y 










light up 
a pixel 




atX 
across 




and at Y 
down 



Let's try this in GRAPHICS 6 without a text window: 



MEW 

10 BR. 6+16 ;: C„ 1 
2 '0 PL... 60, 30 
30 (3 „ 30 



Mode 6 without a text window. COLOR 1. 
Plot 60 across, 30 dawn. 
Remain in an infinite loop. 



Remember, with no text window you need to prevent the Computer from 
printing READY. The infinite loop of Line 30 does that. 

Now that we can light a square, let's draw a line. 



NEW 

10 BR. 6 : C. 1 

20 PLOT 10,, 5 
30 DRAWTO 150,5 
RUN 



It is a good idea to put the COLOR and GRAPHICS 

commands on the same line. 
Illuminate location (10.5). 
Draw a line to location (150.5). 



The command DRAWTO (or DR.) will light all the pixels from the PLOT 
location to the position in DRAWTO. 

There can be as many DRAWTO's in a program as necessary. 
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NEW 

10 BR. 20 ! C. 1 
20 PL.0, 10 
30 DR. 50, 10 

40 DR„ 50, 15 
50 B„50 
RUM 



GR.4 + 16 eliminates the text window. 




'BRAIN FOODi 



A DRAWTO always starts drawing from the last lit pixel. A pixel can be lit by PLOT 
or by DRAWTO. 



See if you can draw: a. a horizontal line 




CHALLENGE 
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b. a vertical line 



c. a box 



d. a triangle 



e. a house 



13-6 
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LINES GALORE 

This unusual program displays many lines on the screen. The length of each 
line is L. Each line starts on the screen at X = A (column number A) and 
Y = B (row number B). The length of the line and where it appears on the 
screen is random. Thus the variables L, A, and B are random. 



NEW 

10 BR. $3 

20 PR. "HOW MANY LINES" 

22 BR. 22 : C. 1 



25 F 



K=l TO N 



50 L=INT C160*RND<0) ) 



35 A=l 
40 B=I 

45 PL. A,B 
50 TRAP 60 



NT C160*RND(0) ) 
NT (96«RNB (0) ) 



•60 N.K 
70 G„ 70 
RUN 



Another way to clear the screen. 



I „ N 



Trap errors in case we draw off the screen. 



Try it. Wow, that is really unusual. Each time you run the program a new 
display of lines appears. 




The lines galore program includes random numbers and graphics. Put on your thinking cap 
and tackle these questions: 



1. What is variable L used for? 



What is variable B used for? 



2. The length of each graphed line is determined in Line 



of the program. The longest possible line is 
graphics blocks long. 



3. Each line starts at block position 



and ends at 
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block position 



4. The TRAP 60 is used to avoid what error? 



GRAPHICS MODES 3, 5 AND 7 

Graphics modes 3, 5, and 7 use four colors. They use one color for the 
background — COLOR 0, and three colors to light the screen's pixels — 
CI, C.2, and C3. Try this. 
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NEW 






10 BR, ' r 


;: C „ 1 




20 PL.3 C 


M9 :: 


DR 


30 C.2 


DR . , 


19 


40 C.3 


; PL . 9 


10 


50 END 







DR 



Select mode 3 and color 1 . 

Draw a line from (39.19) to (19,0). 

Use color 2 to draw a line from (19.0) to (0.19). 

Use color 3 to draw a line from (9.10) to (30.10). 



Each time a new COLOR is selected, the Computer will draw the line in 
that color. 



r 0,0 


graphics 
window 


39,0 ^ 


0,19 




39,19 


0,20 


text 

window 


39,20 


.0,23 




39,23- 



0,0 


graphics 
window 


79,0 


0,39 




79,39 


0,40 


text 
window 


79,40 


L 0,47 




79,47i 



GRAPHICS MODE 3 



GRAPHICS MODE 5 



These are the comer coordinates o( graphics 

mode 3. 
40 columns by 20 rows is the size of the graphics 

window in GR.3. 



Graphics mode 5 can light pixels that are smaller. 
GR.5 is 80 columns by 40 rows for the 
graphics window. 



The text window is 4 lines high. 



It has a text window of 8 rows. 
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The screen in graphics mode 5 is the same size as the screen of graphics 
mode 4. GR.5 and GR.4 light the same number of pixels.. In GR.5 the pix- 
els can be in 3 different colors at the same time. 



/o,o 


graphics 
window 


159,0> 


0.79 




159,79 


0,80 
L0,95 


text 

window 


159,80 
159,95, 



GRAPHICS MODE 7 



Graphics mode 7 has even smaller pixels. 

The graphics window is 160 columns by 80 rows. 



The last 16 rows o/ the screen form the text 
window. 



The screen in graphics mode 7 is the same size as graphics mode 6. GR.6 
lights its pixels in only one color. GR.7 lights the pixels in 3 different colors 
at the same time. 



EXPERIMENT 



PRINT #6; is used in the text modes 1 and 2 to display characters on the 
screen. Try using PR . #6; in graphics modes 3 through 8. Choose a mode, 
then use these lines in a program: 



PR. #63 1.42 

PR. #65 "HELLO" 

PR. #6? "good -by 



Change the characters to inverse video. Notice that the characters use all 
four color registers. The register used depends on the code for the character 
being printed. 
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BRAIN FOOD. 



There are 2 ways to clear the screen in a program: 

1. PRINT "\ " 

2. The GRAPHICS command for example: 

BR„ 1 



TURN IT OFF 

COLOR together with PLOT X,Y or DRAWTO X,Y turns on graphics 
blocks. How are they turned off? 

The GRAPHICS command clears the entire screen. 

If only certain lines are to be erased, draw over them using the background 
color, COLOR 0. 



NEU 



c: 



18 


GR , ? 






15 


C . 2 






20 


FOR X-] 


Tl.: :-;M 


STEF 


36 


PL.X,0 : 


DR.X, 


?9 


40 


NEXT X 






50 


C . 






60 


FOR x=ie 


TO 39 


STEP 


79 


PL.X,0 : 


DR.X 


i (•' 7 


86 


NEXT X 







The screen is cleared. 
Select COLOR 2 to draw. 

Now pou see it. 

Select the background color to erase. 

Now you don't see it. 



90 GOTO i 



Run the program. Have you seen enough? To stop the display press the 
(B REAK ) key. Otherwise, the display will go on forever. 




TERMITE TIME 

Here come the termites. This program demonstrates what could happen 
when termites invade the Computer's screen. 



144 



13-11 



MEW 

5 REM LIGHT UP THE SC 

1.0 GH„ 3+16 

15 FOR X=0 TO 39 

2.0 Q~ i N I (3*RND (0) ) +1 

25 PL,, X ,, ;; DR. X,, 23 

■30 NEXT X 

40 HEM LET THE TERMITE 

4 5 C » 

50 X«INT (40* END (0) ) 

60 Y=INT (24* END (0) ) 

70 PL. X,, Y 

80 GOTO 50 



C „ C Choose a random color. 



EAT AWAY 

Use the background color. 



Run the program and watch the screen light up completely. Then the ter- 
mites eat away at the screen. The graphics blocks are turned off randomly 
by coloring them black. 



FUN TIME 



1 




2 










3 








4 




5 
























6 














7 








8 








9 














10 






















11 




















12 




13 






















14 






















15 




















16 


17 




18 


















19 


20 




21 








22 




























23 


















24 




















25 













Fill in this crossword puzzle. 
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1. Command to move the cursor. 

4. Tells the Computer to execute the program. 

7. Drops the numbers after the decimal point. 

8. Displays a line from the last cursor position. 
11. Display the program on the screen. 

13. Copy the program onto a cassette. 

14. Get a program from a cassette. 

15. It increments a FOR-NEXT loop. 

16. A question with a condition. 
19. DATA'S partner. 

22. Tells the Computer to ask for data with a ?. 

23. Allows the programmer to comment. 

24. Input from disk to Computer. 

25. Chooses a surprise number from to 1. 





1. Causes output to be displayed. 

2. Stores hue and luminance numbers in a color register. 

3. Erases memory. 

5. FOR's partner. 

6. Used in a FOR statement. 
9. Prevents error messages. 

10. GR. 1 selects a mode. 

11. Assigns a value to a variable. 

12. READ'S partner. 

15. Controls pitch and volume of note played. 

17. Start of a loop. 

18. Reserves memory for strings. 

20. Stops program execution. 

21. Disk Operating System. 
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GRAPHICS MODE 8 



Mode 8 offers the best quality line in ATARI Home Computer graphics. In 
this mode the screen contains over 61,000 pixels. 



r 0,0 


graphics 
window 


319,0> 


0,159 




319.159 


0,160 




319,160 


k 0,191 


text 
window 


319,191 a 



GRAPHICS MODE 8 



The full screen has 192 rows with 320 pixels per 
row. This is a total of 61,440 pixels (192 x 320 = 
61.440). 






Only one color is possible at one time on the screen. It is called by COLOR 
1 and has a separate brightness for the graphics point. 

Try this program to see the color of the background and the color of the 
pixel. When the program asks "how bright" be careful you don't use the 
number 10. 10 is the brightness value of the pixel itself. 



new 

5 REM draw a letter M 

10 BR. 8 S C„ 1 Select mode 8. 

20 PL .. 5 ,, 1 9 1 l L)R „ 5 ,, 5 Draw a large M in the graphics window. 

30 DR. 160, 1 91 i I.)R „ .: 1 5 „ 5 

40 DR. 315, 19:1. 

45 REM change the background color 

50 PR. "Which color (0 •- 15) " ; Request the background color for Line 70. 

55 I „ COLOR 

60 PR „ "How bright. (0 14)"; Request the brightness of the background for Line 

65 I. LIGHT 70. 

70 S E ,. 2 ,, C O L O R ,, L. 1 6 H ' 1" Change the background. 

30 !3 „ 50 Return to Line 50. 
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TIME OUT FOR OLD NEWS 



• Graphics mode 3 has 40 columns by 24 rows, or 960 pixels. 

• Graphics modes 4 & 5 have 80 columns by 48 rows, or 3840 
pixels. 

• Graphics modes 6 & 7 have 160 columns by 96 rows, or 15,360 
pixels. 

• Graphics mode 8 has 320 columns by 192 rows, or 61,440 
pixels. 

• PLOT X,Y lights a pixel at coordinate X, Y (X over and Y down). 

• DRAWTO X,Y lights all the pixels from the last lit pixel to the 
pixel at coordinate X,Y 




1. Which graphics mode draws in 2 colors and large blocks? 



2. Which graphics mode draws in 4 colors and small blocks? 



3. How can you eliminate the text window in GR.7? 
What possible problem can arise? 
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4. Write a program to draw an orange box. 



5. Change the program in #4 to draw a solid orange box. 



6. Write a program in GR.7 to draw a star and display "twinkle, twinkle". 
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7. What is the output of each of the following programs: 



a. NEW 

i br . a : c . i 



b. MEW 

10 GR. 5 ! C. 



2« PL. 50,50 :: DR. 50,100 20 PI 20 

30 PL. 50,75 : DR., 100,75 30 C. 3 S 

40 PL. 125,50 :: DR. 175,50 40 C. 3 S 

50 PL. 150,50 ! DR. 150,100 50 C. 1 .' 

60 PL. 125, 100 ! DR. 175, 100 A0 c„ 1 

70 PL. 100,50 : DR. 100,100 70 c, 2 : PL 
80 END 



DR. 20,9 

0,0 : DR. 79., 

79,0 5 DR. 79,22 

0„ I DB . 0, 22 

i 

.i , 



c. NEW 



I..VJ' 



d. NEW 

1 0r . 
20 PL. 



.i:! '■ — I ,\ T ( &S§*RND ( >;'.< - + 1 0S i 

40 C. 1 : PL. 0,Y :;' DR. X, Y 40 C. 

50 C. :: PL. 100, Y 50 PL. 

60 DR. X,Y 55 DR. 

60 DR . 

70 (3. 



NEX" 
S0 END 



5+16 :: C. 1 
0,0 : DR. 0,47 

79, 47 :: DR. 79,0 : DR. 0,0 

20, 12 :: DR. 20, 36 

60, 36 

60,12 ;; DR. 20,12 



8. Write a program to: 



a. Display the word GOODY, in letters as tall as the screen. 
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b. Draw three nested triangles (the triangles are inside each other) in different colors. 
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b. Draw three nested triangles (the triangles are inside each other) in three different colors. 
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CHAPTER 14 

PROGRAMS TO GO 



Sometimes it is fun to just copy a program and type it in. Here are some 
programs for your collection. 



1. HI-LOW WITH A LYING COMPUTER 



2. TIMED ARITHMETIC DRILL 



3. MASTERFIND 



4. SHOOT THE DUCK 



5. FIREWORKS 



6. ETCH-A-SKETCH 



7. WHEEL OF FORTUNE 



The programs use some BASIC statements which you have not learned. You 
don't have to understand the programming, but you must type in the pro- 
grams exactly as shown. Don't forget to save them on a cassette or on disk. 
Have fun! 
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The Computer picks a number between 1 and 100. Each time you enter a 
guess the Computer tells you if your guess is too high or too low. Unfortu- 
nately, the Computer sometimes lies! 



H I - L OW W I TH A LY I N G C DM P U T E R 

1 R EM H I - L QW W IT H A LY I N G C OM P UT E R 

5 PRINT CHR*<125) 

19 PRINT " HI -LOW WITH LYING COMPUTER" J PF 

30 PRINT "I AM THINKING OP A NUMBER BETWEEN I A! 



K UU t r 

C;i-|lv!p- 



49 PRINT ;i I Wi LL TE! 

BEWARE..... SOMETIMES I LIE! 1 

58 M— 1 NT ' t BH *E' -iu ' 9 .• .> + 1 ; F F< ) f <"T 
69 PRINT 'HOW OFTEN DC' v'GU i-' ; -.i ;l p'Uf; ffj L. IE 

EEL DOM- 3" 
79 I NPUT X s X=X+ 2 : PR I NT CHR$ ( 1 25) : i- ; ~0 
88 K=K+ 1 : PRINT "THIS IS GUESS NUMBER "sK;PRI 

3: PR I NT 

>-G THEN i2y 



i 68 IF N<G ' HEN 



••4 !.. 



: PR 1 NT : GuSUB i 8 6 9 



. " ■ PRl K 



■iNu l t3B . - : f-KiN i 



JW, bUi 






110 PRINT "YOU DID IT IN " ; K t " GUESSES." 

i29 IF INT(X*RND<6 > > + 1 <X TEEM 140 

138 PRINT "YOUR GUESS IS TOO HIGH - TRY AGAIN" s GOTO 36 
148 PRINT ,: 'tOUF Gul_I 73 TOt LOW - I-:' AGAIN' 1 ; GOTO tS 
156 1 1- 7 I NT < XfcRMO ( 8 > ) + 1 < - ; "- THEN 1 36 

1 39 GOTO i 46 



10 66 FOR 



. H~ 1 



3.TURN 



hb=i! , 




Check how long it takes you to do 5 problems. Select among addition, sub- 
traction, multiplication and division. You may also select how difficult the 
questions will be. For each problem you get wrong on the first try, you lose 
5 seconds and for each problem you get wrong on the second try, you lose 
10 more seconds. 

Compete with your friends and become a math whiz! 



Hhfl 



V* '. 4 



» c % ' H 



IT MET 



6 


PRINT 


r i. ! p i- 


6 


p E I M T 


« -r ; r : j ■; 


3 


pp V r .; ~' 


"THE 


9 


PR I NT 


- T h i 



' ivi C 



ih 



rC'TAL ELAPSED TIME FROM ME 

F - E - : .R V PR Pi LFM v 7. GE." 



; l E:ET3~ 



P p r f-.. 



ir 



CI '• 



w- 



1 • 



M ". 
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'?S PRINT 5 Z*= B + -*/" 

106 SETCOLOR 2, 3, 4: PRINT "WHICH OPERATION WOULD YOU LIKE <+,-,* OR 

/') " : INPUT M$ 
110 FOR X=l TO 4; IF Z*<X,X)=M* THEN i 38 
120 NEXT X : GOTO 100 

130 PRINT "WHAT LEVEL WOULD YOU LI KE( 1 , 2 , 3) " ; : I NPUT Y 
140 IF Y>0 AND Y<4 THEN 160 
150 GOTO 130 

168 TRAP 230:RESTORE : FOR Q=l TO 4 : FOR R»l TO 3:READ Al , A2 , Bl , B2 , Dl 
170 IF Q=X AND R=Y THEN 1 P0 
130 NEXT R i NEXT Q 
1 30 PR I NT CHR* ( 1 25 ) s POS I T I ON 2 , 1 : PR I NT " T I MER STARTS WHEN YOU PRESS 

RETURN" 
20 I NPUT Q* : POKE 1 ? , : PR I NT CHR* (125) i H=8 
20 5 T-0 

210 H=H+1:IF H>5 THEN 230 : GRAPH I OS 0: SETCOLOR 2 , H , 6 
215 PRINT CHR*( 1 25) : PRINT "PROBLEM # ";H 

229 ON X GOTO 300,350,400,450 

230 SRAPHICS 0: SETCOLOR 2, 1,6; PRINT : PRINT " YOUR ELAPSED TIME IS ": 60/16 

* P E E K ( 1 9 > 5 " SEC ON D S " : P R I NT 
240 PRINT "YOUR PENALTY FOR WRONG ANSWERS ON THE FIRST TRY IS ";FIRST*5;" 

SECOND 3" : PRINT 
250 PRINT "YOUR PENALTY FOR WRONG ANSWERS ON THE SECOND TRY IS ";SEC*18;" 

SECOND S" : PRINT 
268 PRINT " YOUR TOTAL TIME IS " f 66X1 6*PEEK( 1 9) + 5 + FI RST+ 1 8*SEC ; " SECONDS" 

: PRINT : PR INT 
270 PRINT "DO YOU WANT TO GO A GAIN Of OR N)";: INPUT N* ■: I F N*="Y" THEN PRINT 

C H P:$- (125) ! G OT 188 
230 END 

308 GOSUB 568: IF A+B>D THEN 368 
310 E-A+E;GOTO 68 
358 GOSUB 560; IF A-B<D THEN 358 
339 E= A - B : G OT 68 
4 8 G S U B 5 8 : E^A * B : G OT 6 8 
458 GOSUB 50 8 ; E~A/B : GOTO 686 

50 A= I NT < A 1 *RND ( 8 ) ) + A2 : B= I NT ( B 1 *RND ( 8 ) ) + B2 ; D= I NT ( D i *RND< 8 ) ) 
510 RETURN 

520 DATA 3 . 1 , 9 . 1 , i 9 . 79 , 1 6 , 75 , 1 , ?? , 799 ,100, 799 .186, 399 
538 DATA 13,1 ,18,1 ,8.78,21 , 78 ,11 ,10, 799 ,222,799,100,188 
54 DATA 3,1,9,0,6,9,18,7,2,0,99,108,7,2,8 
550 DATA 8 , 1 , 8 , 1 » 6 ,9 , 1 8 , 7 , 2 , , A , 1 5 , 9 , 1 8 , 6 
o8@ T=T+i ;IF T>2 THEN 708 

610 POSITION i,5:PRINT A$M*; B; "~" ', sPOSITI ON 19,5;INPUT U 
620 IF V=E THEN POSITION 8 , 1 8 :T=*8 ; SETCOLOR 2 , 3 , 1 4 ; PRINT " CORRECT ": GOSUB 

738 ; GOT 216 
638 SETCOLOR 2 , e , 2 ; u x7, 1'l " .[ Of , S, 9 i PRINT ' WRUNG "; GOSUB 7"38: IF Tl THEN 78 8 



&4fc FI RST-F I RST+i, s POSITION t% , ^ ;°RINT " 

70 8 P 3 I T I ON 1 8 . 1 S : P R I NT " THE C PRE CT A 

716 GOSUB 738 s SEC == SEC+ 1 fGOTO 28 5 

"'28 GOSUB 7 90: GOTO 218 

738 FOR '..Ml TO 588: NEXT W; RETURN 



iER 
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FIVE DIGITS. YOIJ TRY TO 



A game similar to Mastermind. The Computer selects a number and you try 
to figure out each digit in as few guesses as possible. 

5 DIM R*C5) ,G*<5) ,Z*<i> ,R<5) ,S*<1 > 

6 GRAPH I CS 8 : SET COLOR 2 , i 3 , 8 
18 PRINT " MA ST E R F I N D " s P R I NT 
28 PRINT " THE ATARI PICKS A RANDOM NUMBER OF 

GUESS IT." 
38 PRINT : PRINT "THE COMPUTER RESPONDS 141 TH THE NUMBER OF POSITI GNS< P' S> 
AND THE NUMBER OF DIG II 

49 PRINT -.PRINT "THE P'S MEAN CORRECT DIGITS CORRECTLY PLACED." 

50 PRINT "THE O'S MEAN CORRECT DIGITS, BUT INCORRECTLY PLACED." 
55 FOR Q=l TO 200 0: NEXT Q 

60 PRINT : PRINT "SUPPOSE THE ATARI PICKS 19506" 

70 PRINT " mmmmmxammmmmmmmmmentmmmmmmmmmmmmaammmmmm^ " 

86 PRINT "YOUR GUESS IS 15378 THEN P=l AND D=l . " 

90 PRINT "YOUR QUESS IS 19878 THEN P=2 AND D=l . " 

108 PRINT "YOUR GUESS IS 19578 THEN P=*3 AND 0=6." : PRINT 

183 PRINT "IF YOU WANT TO END THE GAME, PRESS RETURN WITHOUT A NUMBER 

THE COMPUTER WILL TELL YOU IT'S NUMBER" 
165 PRINT sPRINT "PRESS RETURN TO START - READY" :: INPUT S$ 
118 PRINT CHRfX 125) sR< i >=INT< 18*RND<8) > 
1 1 5 FOR A=2 TO 5 

128 R<A>=INT( 10*RND(0> > :FOR B=l TO A-l 
130 IF R<A)«R< B) THEN 120 
148 NEXT B 
150 NEXT A 

160 FOR A=l TO 5;R*(A,A)=STR*<R(h).> :NEXT A 
165 K=l :SETCOLOR 2 . 1 , 4 : SETCOLOR 1,1,14 

170 PRINT "THIS IS GUESS NUMBER ";K;" ENTER A FIVE DIGIT NUMBER" 
180 INPUT G* 

185 IF LEM<G*>=0 THEN 30 5 
198 IF LEN<e*>«5 THEN 218 
20 PRINT "FIVE DIGITS PLEASE . "i GOTO 188 



218 D=8 : P=8 : FOR A~i iO 5: FOR B-- 



-r ,- s e 



228 IF R* <A«A>=G*<B,B) THEM D=D+i 

238 NEXT BiNEXT A 

240. FOR A=l TO 5 

258 IF R*(A.A) <>6*< A , A> THEN 272 

268 F— P+ 1 :D=D-1 

279 NEXT A 

288 IF P=5 THEN 39 6 



298 PR INI 



— n » fs • PRINT 



; GOTO 1 76 



38 8 GRAPHICS S: SETCOLOR 2, 18 ,4 jPOSITI ON 5, 18; PR I NT 
GUESSES. " 

384 FOR ZQ^i TO SsPRINT CHR4> < 253 );: NEXT ZQsGOTO 31 

385 PRINT "THE COMPUTER'S NUMBER IS H sR*:FOR Z2«l ' 



!U DID r 



1 508 tNEXT 



318 PRINi 

328 IF Zf 
339 END 



:■ ts --, . c< 



YOU WANT TC 



A GA I N ( Y R N > * s I NP JT Z * 



_ M '•..■■ ii -r 



F'HEN 1 1 8 
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Do you like Arcade games? Well here is a simple version of a shooting gal- 
lery. A duck moves back and forth across the screen. You have 60 seconds 
to hit it as often as you can. Your score is displayed as the number of hits 
and the percent accuracy. 



i REM SHOOT THE DUCK 

5 DIM S$<1 ) ,D*<2> ,U*(2) ,K*<3> ,GS<1 > ,A*( 1> ,TITLE*<20> 

6 F=6 :TITLE*=" SHOOT THE DUCK"' 
S POKE 18,8: POKE 752, 1 

16 GOSUB 3060 : GRAPHICS 8: POSITION 2, 10s POKE 752,1 

20 PRINT "UP ARROW FIRES THE GUN,/ MOVES THE GUN TO THE RIGHT" 

38 PRINT "< MOVES THE GUN TO THE LEFT. YOU HAVE 66 SECONDS TO PLAY." 

49 PRINT "HAVE FUN'":PRINT "PRESS RETURN TO START . " ; I NPUT St 

5S D$<1 ,1 )=CHR$(?) :D*<2,2)=CHR*< 15) 

60 U*-< 1 . 1 > = CHR£>: 143) ;U'*X2,2) = CHR*<25) 

70 K*< 1,1) = " " :K*<2.2)=CHR* f : 166) sK*<3, 3)=CHR$< 168./ 

8@ Gf-CHR-f < 1 66 ) 

85 X=28 : G=20 i GOSUB 1068 

36 IF 68X1 6*PEEK( 1 ?)=68 THEN 80 

90 IF FLAG=1 THEN 110 

190 X=X+1:IF X>37 THEN X=37:FLAG=i 

1 3 GOSUB 1808 

185 GOTO 126 

110 X=X-1:IF X<8 THEN X=0:FLAG=@ 

1 1 5 GOSUB 1 088 

128 IP PEEK<764)=55 THEN 6=8+2sP0KE 764,255 

138 IF PEEK (764) =54 THEN 6=8-2 ! POKE 764,255 

148 IF PEEK*: 764) = 14 THEN POKE 764, 255 s SOTO 28 

158 GO TO S6 

208 F=F + 1 sFDR D=X TO X+3sF0R QG-!=29 TO 5 STEP -5:P0SI7I0N G.QQsFRINT CHP* 

CI24.MNEXT QQsIF G=D THEN 216 
28 5 NEXT D:GOTO 86 
218 PRINT "QUACK" : POSITION X,3sPRINT " " ; POSITI ON X , 4 : PRINT " ": 

POSITION XX5;°R[NT " " sH=H+ 1 s GOSUB 2888 
215 GOTO S6 
800 PRINT " TIME IS UP. YOU FIRED " ; F ; " SHOTS AND HIT " ; H : " TIMES. YOUR 

ACCURACY IS " j 1 00*H/F ; " '/. . " 
310 PRINT "DO YOU WANT TO PL At AGAIN (V OR N) "; INPUT A* : I F A*="Y U THEN 85 
815 END 
1808 PRINT CHR*U 25) : POSITION <, 3 s PRINT DISPOSITION 

X, 5; PR I NT K* 
1801 IF G>39 THEN 6—39 
188 2 IF G<8 THEN G=8 

1883 POSITION G. 23; PR I NT G* J RETURN 
2880 FOR PAUSE=1 TO 260 s NEXT PAUSEsRETURN 
3888 GRAPHICS IStFOR COLQR—1 TO 1 5 

3818 POSITION ,5*(20-LEN<TITLE4) ) ,6sPRINT #6;TITLE$ 
3820 SETCOLOR , COLOR , 6 : FOR PAUSE* 8 ! TO 108:NEXT PAUSEsNEXT COLOR 
3838 RETURN 



4 sPRINT Uf-sPQSl t I ON 
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Here are explosions of sound and color. This program uses the joystick in 
controller jack #1. Just press the button and an explosion appears on the 
screen. Can you fill the screen? Watch the pretty patterns form and listen to 
the noise. Have fun! 



1 REM FIREWORKS 

IS GRAPHICS 3+ l6:SETCGL0R A , 6 , 8 

26 A=INT< RND<8)*1 6) sB~RND<@)*l 1 M :C=INT< RNDC0) *3> + 1 

30 X=RND<8 ) *39 + 1 ; Y=RND< 8 ') *23+ i 

49 7— RND( 8 > *21 3+29 : U=RND( > *21 3+29: Q— ■, T--U > ,1 9 

50 SOUND , , 6 < : SETCOLOR C-1.m,B:7RAF SSsCOLOR C 
60 IF STRI6(0><;-0 THEN 60 

70 PLOT X.Y: SOUND @,T,1@,6 

80 PLOT X + 1 , Y : P L OT X - i , Y : PLOT X , Y - 1 : P L OT X , 7 + i. : L= 3 @ i SO UN D 8 , T + Q , : 6 , 6 
90 PL OT X + 2 . Y : P L OT X - 2 . Y : P L OT X , Y - 2 : P L OT X , Y + 2 5 L- 9 i 3 UN D , T + 2*0. , i 8 , 6 
108 PLOT X+l .Y+l : PLOT X~i ,Y~i : PLOT X+l ,Y-i sPLOT X- i ,Y+1 :L=1 88: SOUND 8,T+ 



118 PLOT X+3,YiPL0T X~3,YiPLQT X,Y-3:PL0T X. Y+3:L=! i : SOUND 8.7+4*0.10 
120 PLOT X~l ,Y-2sPL0T X+ i .Y-t 2 : PLOT X-2.Y+1:PLQT X+2 .Y-i !L=1 20 ".SOUND ," 

138 PL07 X-2 .'-( -1 : PLOT X+2 f Y+l:PLQT X-i,Y+2:PL07 X+ 1 ,Y~2sL=i 38 : SOUND 0.1 

*Q, 18 ,6 
148 PLOT X-l ,Y--3: PLOT X+1,Y+3jPLQT X-2,Y-2;PL0T X+2 , Y+2:L=148 s SOUND 3." 

#Q , 1 9 , 6 
i53 PL07 X-1,Y+3:PL0T X+ 1 . r'-3 : PLOT X-2.Y+2:PL0T X+2 ,Y-2: L=i 58 : SOUND 8, T 

*Q 1 +• 

160 PLOT X 3.Y-i;PLQT X + 3 ,Y+ i ; PLOT X-3 ,'Y + 1 :PLOT X+3, Y~l :L=168 



JUNU 8 . I +9 



1 78 PLOT 7-4 , Y : PLO f X+4 , Y : PLOT X , f '-- 4 : PLOT' 

1 88 GOTO 26 

20 8 IF X > 4 u TH EN X=X - 48 : GOT L+ 1 8 

216 IF X<0 THEN X=4Q+X ; GOTO L+18 

228 IF Y>26 THEN Y--V-28 i GOTO L+10 

238 I F Y < 8 T HEN Y= 28 + \ ' : G OT L+18 

248 GOTO 28 



L— i '9 : SGUNC 8, : ~-*- 5. &*& 
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6. ETCH-A-SKETCH 



This program uses the joystick in controller jack #1. The program works just 
like the well known toy. You can draw and erase horizontal, vertical, and di- 
agonal lines. Use the program to write messages or draw pictures. Press the 
button and you will draw in a different color. How artistic can you be? It's 
up to you. Try it, it's fun! 

1 REM ETCH-A-SKETCH 

i 6 GRAPH I CS 3+ 1 6 ; SETCOLOR 4,6,2; X=2@ : Y= 1 2 : C : -y 

i 5 SETCOLOR 8,8,18s COL OR i : PLOT X . Y 

26 A-RND < 8 :> * i 6 : B=RND < B ) *1 1 + 4 ! C=C+ i 

? 6 IF C > 3 T HEN S ET LOR 4 , A , 2 i C=*8 : 8 OT 5 8 

40 SETCOLOR C-i .A , B : COLOR 3:0=0 

56 TRAP 170 

55 FOR P~i TO i 8 0s NEXT P 

65 IF STRI 0'" 8 ; ,: =0 THEN 20 

70 ON STICK<8)-4 GOTO 96 . 1 08 , i 1 , 60 , 1 20 , 1 38 , 1 40 , 68 , 1 58 , 1 68 

38 GOTO 60 

PS X=X+i :Y=Y+i :G0T0 229 

166 X=X+1 :Y=Y-1 sGOTO 22 

1 i 6 X=X+ I ; GOTO 229 






i ~ r + 1 : 6 1 228 
Y=Y— 1 : GOTO 228 
GOTO 226 



150 Y--Y+l:GuTQ 228 

J 68 Y—Y-l : SOTO 228 

7 a t 



ifo IF X/46 THEN X=0 i GOTO 58 
186 IF X<8 THEN X=46:60T0 58 
199 IF Y>24 THEN Y=0 : 80TQ 58 

20 8 IF Y<0 THEN Y=24:G0T0 50 

2 1 6 G OT 5 

226 LOCATE X,Y,2 

238 IF Q=Z THEN COLOR 8; PLOT X,Y: COLOR C : SOTO 69 

24 6 PL OT X , Y ; G OT 6 8 



1. 
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7. WHEEL OF FORTUNE 




Have you ever been to a carnival or an amusement park and watched the 
Wheel Of Fortune? These are the games where you bet on the spin of a 
wheel. This can get very expensive! The program is just like the carnival 
game, but it's free! Type it in and see how lucky you are. Try competing 
with a friend. You're sure to have fun. 



1 REM WHEEL OF FORTUNE 

2 DIM A* < 1 > , (3S( 1 > ! OPEN 8 1 , 4 , 9 , " K : " 

5 PRINT CHR*C 125) :PRINT "THE WHEEL OF FORTUNE WILL SPIN THE" 

6 PRINT " NUMBERS FROM 1 TO 6." 
? for Q~i TO 158@:NEXT Q 

1 8 GRAPH I OS i + 1 6 r POS I T 1 ON . 9 

26 PRINT 86 ;"YOUR LUCKY NUMBER IS": GET ftl ,N : G*=CHR* (N) 

36 POS I T I ON 18,11: PUT 86 , N 

35 L=I NT< 6*RND ( 8 > + 1 > : K=@ 

48 FOR A~l TO 58 : SOUND 8,68,14,18 

58 POSITION 18,8:PRINT #6; INT< 6*RND< > +1) 

55 FOR W*l TO 5: NEXT w: SOUND 8,8,6,8 

66 FOR W-l TO A/ 15*1 (3 : NEXT Ws POSITION 18,8: PR I NT #6;" " :NEXT A 

65 POSITION 18, 6: PR I NT 86; L: FOR 14=1 TO 188: NEXT W 

78 IF L='-, : AL<G*> THEN 95 

S8 GRAPH I CS 8 : POS I T I ON 5 , 1 2 : PR I NT " THE LUCK ( NUMBER IS " : L 

98 POSITION 15, 14: PRINT "YOU DID NOT HAVE IT" : GOTO 113 

95 GRAPHICS 2 : SETCOLOR 4 . 4 , 4 ; SETCOLOR 2.4,4 

188 PRINT "THE LUCKY NUMBER IS ";L 

1 8 5 POS I T I ON 4 , 2 : PR I NT ft 6 ; " YOU GOT IT!": POS I T I ON 4 , 5 : PR I NT 86 5 " you got 

it!" 
U8 POSITION 2.23:PRINT "TO PLAY AGAIN PRESS THE A KEY";: GET 8i,N 
128 IF CHR*<N>="A" THEN 16 
130 END 
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CHECKPOINT: 

1. So the zero looks different from the letter O. 

2. Yes all the letter keys are upper case. 

3. All the keys containing symbols other than letters and digits are special keys. 

EXPERIMENT: 

The screen is completely erased. 

CHALLENGE: 

38 characters in each line, 24 lines on the screen. 




YOUR TURN: 
15 



36 



THINK: 

1. + addition — subtraction * multiplication /division 

EXPERIMENT 

1. The space between PRINT and the quotation marks is not necessary. 

2. Messages and calculations can be combined. The semicolon is used between them. 

3. A blank line is displayed because a blank message is within the quotation marks. 

SHORTCUT: 

They all display 36500. 

CHALLENGE: 

"5 + 3" is a message and not an addition. 

FUN TIME: 



1 

R 


E 


T 


U 


R 


N 






E 
















A 








2 

S 






3 

Q 


4 

D 


E 


L 


E 


T 


E 




U 


Y 








A 















5 

P 


R 


1 


N 


T 
















E 








6 

B 


A 


C 


K 


S 
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EXERCISES: 



1. AROUND THE WORLD IN 80 DAYS 



2. PRINT 7*24*6* 



3. PR 



1 S I X F E E T E Q U A I.... " ! 6* 1 2*2 . 54 5 " C E N T I METERS." 



4. PRINT "MR. PRESIDENT" 

P R I N T " 1 6 P E N N S Y 1... V A N 1 A A V E M U IE * 




YOUR TURN: 

The background is dark purple. 
The background is bright pink. 
The border is dark green. 
The border is mid orange-green. 

YOUR TURN: 

A low tone, soft, pure sound. 

A middle tone, medium volume, distorted sound. 

A very high tone, slightly soft, throbbing sound. 

A very high tone, slightly loud, click. 

Sound register is turned off. 

A middle tone, slightly soft, pure sound. 



FUN TIME: 












1. 

2. 


SOUND 
CTRL 


D E 
N S 


LAS 
B R 


CMQR 


3. 
4. 


SETCOLOR 
DELETE 


S 

s 


6 

u 


E A R 
N T N 


E A D S 
A M E D 


5. 


CLEAR 
SYSTEM RESET 



N 


N 
D 


C E C 
U C L 


R A K L 
R E A 


6. 


D 
N 
U 


E 
C 
S 


LET 
L T 

Y S T 


E L T R 
C LKO^ 

EMIR 




d 


RES 


E T O C 
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EXERCISES: 

1. Editing 

2. CTRL I DELETE ) 



3. i SHIFT i 'INSERT' 



ANSWERS 



4. Use the CAPS LOWR key. 

5. 16 (8 shades of each color) 

6. SOUND & SETCOLOR 

7. For example, SE. 2,6,4 and SO.1,50,10,8 are nice. 




CHECKPOINT: 

1. 10 LET L ■ 20 

2. Line 40 

3. The program is gone from memory. 



THINK: 



a) I AM 6REAT 

b) 132. 85 63.79 

c) 5678+1234 EQUALS 



d) 1 




J. 00 


20 




400 


30 




900 


YOUR TURN: 






A«i 






B»2 






PRINT 


A 




:!. 






PRINT 

'■■i 


B 




PRINT 


E 




PRINT 


A , B , E 




1 


2 





3394 . 9896 2 . 8473909 
6912 



EXERCISES: 



1. PRINT LET 

2. 6+10 « 16 



164 



ANSWERS 



3. ERROR -; A 4-3 is an illegal variable name; therefore a syntax error occurs. 

4. 1 1 1 1 1 

5. HELLO 
96 

2300 
4 

6. NEW 

10 E6G ■ 1.4 

20 NUMBER = 12 

30 PRINT EGG*NUMBER 

40 END 

7. Move the cursor to the number 12 of Line 20. Type and press [RETURN) . 




LET'S PRETEND 

14 ~2 
READY 



48 .75 



2*M+3*R=36 

READY 



A DISCOVERY: 

94+89+90/3 = 213; only the 90 is divided by 3. 

The double commas are needed to line up the first two lines of answers with the third line. The 
statement 'AVERAGE GRADE" is longer than 10 characters, therefore we use more than 1 zone. 



FUNTIME: 



EXERCISES: 

1. A 



A* 




( T~N I R P )V (eJ 




165 



ANSWERS 



2. 

bl ank stn ng 

3. a. Remove the comma before A. 

b. 13 should be a variable name. 

c. X-Y is not a legal variable name. 

d. Only one comma between 5 and 6. 

e. No error 

f. Period should be a comma or a semicolon. 

g. Missing a value for C. 



4. a. JACK AMD J I LI... 
b. 6 

5. NEW 

1.0 READ A, B,, C 

1 S DA i A 2 , '■- . 4 

20 D ::;:: A*B C 

25 PRINT D 

30 END 

6. NEW 

10 PR. " X" 

20 PR. " Xxx" 

30 IE., '' XXX XX" 

40 EE „ " x x XX XXX 1 

50 PR. " XXX" 

60 PR. " XXX" 

70 PR. " XXX" 








CHECKPOINT: 

1. CSAVE 



2. together press the 'RECORD' and 'PLAY 1 buttons. 

3. CLOAD: [RETURN] key: IPLAY' button; 'RETURN' key. 

CHALLENGE: 

change or insert the following lines: 



26 IOK+1 

40 PR. '***** YOU GOT 

YOUR TURN: 

To save the program: 

1. Type in the program. 

2. Type: I S II A " V ' E " " " D II 1 
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3. Press [RETURN) . 
To run the program: 

1. Turn on the disk drive. TV, and Computer in that order. 

2. Type:' l IC53CEO II " WG " ! " D ECDCDG H " I. 



3. Press ' RETURN ). 

4. Type QDQDQD. 

EXERCISES: 

1. Once the program is on tape or disk you can load it into the Computer whenever you want. 

2. CSAVE stores a program on cassette tape. 

3. SAVE"D1: name" stores a program on disk. The name can he up to 8 letters or digits. 

4. CLOAD will load into the Computer whichever program is next on the tape. 

5. Type I D A" Q3 " ' D 1 : T W " and press [RETURN). 

6. CLOAD will load a program from a cassette into the Computer. 
LOAD will load the program from a disk. 

7. Each new unformatted disk must be FORMATted. The DOS system must be transferred to 
every new disk. 

8. The program name must be less than 9 characters, start with a letter, and contain no special 
symbols. 

9. Saving a program on a disk is much faster than saving it on a tape. Also subsequent loading 
from disk is faster. 

10. a) Cassette 



1. 

2. 

3. 
4. 


Place a tape into the recorder & rewind it. 

Set the tape counter to 0, then advance the counter 2 digits beyond 
the end of the last program. 


Type C S A V £ & press RETURN 1 . 


Press 'RECORD! & PLAY, then press 'RETURN 



b) Disk 



1. Be sure to turn on the disk drive and T.V. 

2. Insert a System Disk into the disk drive. 

3. Turn on the Computer. 

4. Type: CEQD D I 3QDG I : "PROGRAM NAME". T ' I. & press 'RETURN) 
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CHAPTER 7 




CHECKPOINT: 

1. The corrected statements are: 



THINK: 



10 INPUT A,B 

15 INPUT A or PR. "WHAT IS YOUR AGE" Hi. A 

20 INPUT A, A* 

25 INPUT X,Y,Z* 

30 INPUT L, M„N 



2. ERIC 
10 



J. 2 



(a) READ program 

20 DATA 4,5,6 

RUN 

SUM IS 15 



1 



3.10 PR. "WHAT IS YOUR NAME": I.N* 



(b) INPUT program 

RUN 
?4, 5, 6 

SUM IS 15 



EXPERIMENT: 



°c 





25 


50 


75 


100 


Op 


32 




,„ 


[ST 


?13 



































"F 

































































































































































































































































































































































































































































































































































































































































































































































25 50 75 100 



DID YOU KNOW: 

Water boils at 212° F and freezes at 32° F. 

FUN TIME 



1. LIST 

5. LET 

9. DATA 

13. PRINT 



2. CLOAD 
6. SOUND 
10. REM 
14. INPUT 



3. DELETE 
7. SAVE 
11. COMMA 



4. RUN 

8. END 

12. NEW 
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/v\l 


A 
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vV 
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EXERCISES: 



1. PRINT"'*!" can be included in a program. It then clears the screen only when the 
program is run. Whenever the SHIFT & CLEAR keys are pressed the screen is 
cleared immediately. 

2. The program computes your age in year 2001. 
3 



WHO IS THERE" i INPUT N* 



NEW 

•5 DIM N*(6) „P*(17) 
10 PRINT "KNOCK KNOCK 
20 PRINT N*; " WHO" 
30 INPUT P* 
40 PRINT "YOU MUST BE PULLING MY LEG ! " 



4. Press the [ SHIFT &' CLE AR^ keys. 
Type DO, and press RETURN . 

5. NEW 

10 PR. "THREE NUMBERS" : I . A,B,C 
20 PR. "THEIR PRODUCT IS " ; A*B*C 
30 END 

The END statement is optional. 




COMPUTER QUIZ: 

NOPE, THE CORRECT ANSWER IS 24 

EXPERIMENT: 

1. Replace Lines 20, 30, and 40. 

2. The following lines replace Lines 10, 30, and 40 of the computer quiz program: 

10 PRINT "YOUR THREE NUMBERS "J INPUT A„B,C 

30 IF S==A+B-i-C THEN 60 

40 PRINT "NOPE, THE SUM IS " ; A+B+C 
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CHECKPOINT: 

1. There are six comparison symbols. 

2. Branch to another part of the program if the condition in the IF-THEN is true. 

3. a. Line number missing after THEN. 

b. The IF statement has no line number. 

c. < > = is an incorrect comparison symbol. 

d. This statement has an error in logic. If W = 10 transfer is made to Line 45. If W is 
not equal to 10, the run also continues on Line 45. That makes no sense! 

e. Must use the equal sign = . 

STRINGS AGAIN: 

String variable A$; the character string is 
"I WAS BORN IN 1776" 

MORE PRACTICE WITH IF-THEN: 

YOU LOST YOUR COOL 

CHALLENGE: 

If you type TRUE the program is still OK. 
If you type in FALSE the Computer responds: 

YOU ARE RIGHT ON 
YOU LOST YOUR COOL 

The END between Lines 50 and 60 is needed. Without Line 55 the Computer's re- 
sponse makes no sense. 



FUN TIME: 



12 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 

a. CLEAR b. question mark c. comparison symbol 
d. unequal e. LET f. RETURN g. string h. slash 
i. READ j. END k. IF THEN 1. condition m. RUN 
n. keyboard o. LIST p. DELETE q. less 

'COMPUTERS ARE FOR KIDS is a registered trademark of: 
National Computer Camps Inc. 
Box 585 
Orange, Connecticut 06477 



EXERCISES: 



YES 
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2. IF L < 22 THEN 40 

3. 60 IF K < > 63 "THEM 65 
64 



4. 20 

40 

5. 


IF A < 
END 


: 1 8 

i 


l"HEN 50 








^ 






DIM N$(25). 
AS(3) 








\ 


YES 






/ PRINT / 
/ TYPE IN / 
/ YOUR NAME"/ 






1 






/ INPUT / 

/ / 






\ 






/ PRINT IS / 
/TODAY YOUR / 
/ BIRTHDAY' / 






\ 






/ INPUT / 

/ A$ / 






^ AS= \> 
N. YES /^ 






/ PRII 
-w "HAF 


« / 

/ 

W.":N$/ 






/BIRTHD/ 










/ ZTl L 






J TOO BAD H 




1 








■ 






( - 


) 



6. Quotation marks around LINCOLN are missing and Line 50 is missing: 

20 IF N$= "LINCOLN" THEM 50 
50 PRINT "HI ABE" 
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C START J 
\ 



PRINT 
"YOUR 

NUMBER' 




PRINT "THE 
YES ./NUMBER "W" 



IS POSITIVE' 



PRINT 
DON'T LIKE 
YOUR 

NUMBER' 



C 



END 



J 



8. MEW 

10 PRINT "YOUR NUMBER " " INPUT W 

20 IF W > THEM' 40 

30 PRINT "I DON'T LIKE YOUR NUMBER" 

35 END 

40 PRINT "THE NUMBER ";WS" IS POSITIVE' 

50 END 




THINK: 

1. 1 

2. 2 

3. Press the (BREAK) key. 

YOUR TURN: 

Type in 2 number 

7+9 - 16 

Type in 2 number 

(etc , ) 



EXPERIMENT: Without Line 45 a no answer to the IF will display JUST RIGHT and TOO BIG. 
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CHALLENGE: 



NEW 

10 PAY ~ 1 i SQUARE » 1 

20 PRINT SQUARES" "5 PAY, 

30 SQUARE = SQUARE + 1 

40 PAY - PAY * 2 

50 IF SQUARE O 64 THEM 20 

60 REM A CHESSBOARD HAS 64 SQUARES 

70 END 



EXERCISES: 



1. a. 1 



b. 



c. What is your name 
?Atar i 
Hel I o Atari 




2 

6 
8 

10 



e. 4 



f . ■':' -I- : ; ■■- t> 
B+B «= 16 
12+12 « 24 
MO MORE DATA 



(Notice GOOD-BYE is never 
printed.) 



2. a. 




c 



START 




PRINT 

NUM 



YES 
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2.b. 




2.c. 



(10) 
(20) 



(30) 



(40) 



(50) 



(60) 



(70) 





f START ) 

t 




COUNT = 




»« 


' 




/ INPUT / 




/ ABCr 7 




i 




AVE = 




A + B + C + D 


4 




' ■ 




/ PRINT / 




/ AVE / 




1 




COUNT 




COUNT ■ 1 


YES ^^ 'S\ 


* *C COUNT 3^ 


\ ? ^/^ 




JNO 


( STOP J 



3. a. NEW 

5 PR. "ENTER 5 NUMBERS" 

10 INPUT A,B,C,D,E 

20 AVE - (A+B+C+D+E) /5 

30 PRINT AVE 

40 GO TO 5 

50 END 



b. NEW 



10 K = 100 

20 PRINT K 

30 K = K-l 

40 IF K > THEN 20 

50 END 



c. NEW 

10 K = 20 

20 PRINT K 

30 K = K+5 

40 IF K <- 500 THEN 20 

50 END 



d. NEW 

10 Q = 20 
20 PRINT D 
30 Q = Q+2 
40 GOTO 20 
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e. NEW 

10 NUN - 1.1 
20 PRINT NUN 
30 NUM » NUM+2 
40 IF NUM <= 2 
50 END 



f(i). NEW 

10 Y ~ 

2 R : = 2 

30 R • :::: 2#R 

40 V ;:::: Y-i'l 

50 IF R < 1000000 I HEN -0 

60 PRINT Y 

70 END 



f(ii). If the rabbit population increases by 50% each year change Line 30: 

30 F: = R+.5*R 




THINK: 



30 PRINT L? 



20 FGF L=4 rO 7 
YOUR TURN: 



. J „ to u / 



I... 

D 5 , 7 ,, 9 

V 1 , 4 ,, 7 ,, 1 

E 10, 20„ 30, 40, :'ii.i 

N 1 ,,9,8 ,, 7 ,,6,5 

Y 1 

10 FOR A=101 TO 104 

10 FOR T»l TO 3.5 STEP 0.. 5 

10 FOR A=15 TO 10 STEP -5 

10 FOR R=10 TO STEP -2 

10 FOR I ~-.6 TO 1 . STEP . 1 



CHALLENGE: 

1. 10 times 

2. 1 time 

3. 1 time 

4. 4 lines 

5. No — because of the trailing comma in Line 20. 

6. Yes — because there is no trailing comma in Line 40. 



FUN TIME: 



Counter variable outer loop is L. 
Counter variable inner loop is PAUSE. 
Loop of Lines 40-41 is not nested. 
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Loop of Lines 60-61 is nested in the loop of Lines 50-65. 

THE TWELVE DAYS OF CHRISTMAS: 

78 gifts. 



EXERCISES: 



l.a. RUM 

# •«- a- -S- * 

# •?!' * •& ■&■ 

■*• *■«- a- •*• 



b. RUN 

4 3 2 1 



c Rt.JI\ 
5 
6 
7 

a 



36 
49 
64 



2. RUM 

ROW ROW ROW YOUR BOAT 



3.a. MEW 

10 REM STARS AMD DASHES 
20 FOR (k-l TO 3 

30 PRINT "*** ,! 

40 PRINT " *##" 

50 ME XT A 



b. MEW 

10 REM TABLE OF SQUARES & CUBES 
20 FOR B=l TO 4 

30 PRINT B| " "SB*BI" " ", B*B*B 
40 ME XT B 



K 


L 


K*L 


l 


4 


4 


l 


5 


5 


.-■ , 


4 























5.a. IF-THEN 



FOR-NEXT 



MEW 

10 K=l 

20 PRINT l<; " "", 

'30 l< = K+2 

40 IF l«20 THEM 20 

50 EMD 



NEW 

10 FOR K=l TO 20 STEP 

20 PRINT K5 " "5 

30 NEXT K 

40 END 



b. IF-THEN 



FOR-NEXT 



MEW 

10 K=3 

20 PRINT 1/K; " "; 

30 K = K+l 

40 IE K <= 10 THEN 



NEW 

10 FOR K=3 TO 10 
20 PRINT 1/K; " ": 
30 NEXT K 



20 



6. Add the following lines to the Christmas song: 



15 T = 
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85 PR 



+t. 



TOTAL NUMBER 



GIFTS FOR 12 DAYS IS 



7. NEW 

10 TOTAL- 1 :PAY=1 

20 FOR SQUARE=2 TO 64 

30 PAY —PAY * 2 

40 T m A L^ TOTAL + PAY 

50 NEXT SQUARE 

60 PRINT TOTAL 




CHECKPOINT: 






SMALLEST NUMBER 


LARGEST NUMBER 







9.9999999999 


5 




14.9999999999 


10 




19.9999999999 


4 




23.9999999999 


5 




6.9999999999 


THINK: 

5 






7 













9 






3 






5 






YOUR TURN: 






SMALLEST NUMBER 


LARGEST NUMBER 







9 







14 







19 


1 




10 


1 




20 


6 




20 


3 




20 


1 




7 


CHALLENGE 






20 PR. INT 


(6*RND(0) 


)+l 



26 Y=INT (6*RND(0> )+l 
30 PR. X; " "5 Y; " "3 X+Y 
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1. 


a. 


PR, 




b. 


PR „ 




c. 


PR ., 


2. 


a. 


PR. 




b. 


PR, 




c. 


PR . 




d. 


PR, 




e. 


PR, 




f. 


PR, 



EXPERIMENT: 

Blanks now correspond to random numbers 1, 3, 4, and 5; 
$'s correspond only to the random number 2. 

DISCOVERY: 

S P R „ ' ' T H E A '■■■/ E R A IB E F A L L 3 N U li B E R S IS "!S/ 3 
The more often we run the program, the closer the average gets to the expected value 2. 

EXERCISES: 

INT (2*RND (0) ) + 1 
INT C6*RND(0) ) + :l. 
I NT <6*RND (0 ) ) + 1 + 1 NT ( 6*RND ( ) ) + 1 

INT (6#RND (0) ) 
INT (6*RND (0) ) +1 
INT ( 100*RMD(0) ) -Kl. 
INK 16*RND(0) >+5 
INT (2*RND (0) ) +7 
INT (3*RND<0) ) 

3. new 

10 FOR M=l TO 8 

2 I F I N T ( 2 * R N D ( ) ) + 1 = 2 T H E N 3 5 
25 PR. "HEADS" , 

30 BO TO 40 

35 PR. " TAILS",, 

40 NEXT I'l 

4. NEW 

10 FOR M=l TO 4 

20 X--INT (3*RND (0) ) +1 

25 IF a=1 THEN 55 

30 IF X=2 THEN 45 

35 S«S+50 

40 BO TO 60 

45 S-S+20 

50 BO TO 6« 

55 S=S+5 

60 NEXT M 

65 PR. "YOUR SCORE ";S 

5. NEW 

10 FOR K=l TO 5 

15 PRINT "TYPE IN YOUR BUESS"! INPUT B 

2 A =INT(6*RND( ) ) + 1 

25 B=INT<6*RND<0) )+l 

30 IF B=A+B THEN 45 

3 5 P R I N T ' ' S R R Y T H E R 1.... I.... WAS " ", A + B 
40 BOTO 55 

45 PRINT "CONGRATULATIONS! " 
50 S=S+50 
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55 ME XT' K 

6 P R I N T ' ' Y U R F I N A L 5 C R E I S ! ' ! S 




CHECKPOINT: 






POS.4.6 


four 


six 


POS.8,15 


eight 


fifteen 


POS.20,10 


twenty 


ten 


POS.9,4 


nine 


four 


POS.15,0 


fifteen 


zero 


POS.38,1 


thirty-eight 


one 


POS.30,22 


thirty 


twenty-two 


YOUR TURN: 







1. NEW 

10 POS. 10, 15 
20 POS. 16, 15 
30 POS,, 10 , 21 
40 POS,, 16, 21 



PR. "*" 
PR. "*" 
PR. "■*" 
PR. "*" 



MEW 

10 FOR X=0 TO 39 

20 POS,, X,4 : PR. "# 

30 ME XT' X 

40 END 



3. MEW 

10 FOR R"0 TO 23 
20 POS. 19., R :PR. "*" 
30 ME XT R 
40 END 

EXPERIMENT: 

The results will vary depending on your input, but a sample follows: 



What is your 

HAVE A 

GOOD DAY 

OAF'; A 



•f i r '"■ I name 'CAR A 



HAVE is orange, 
A is dark blue. 

GOOD is light green, 
DAY is red. 

CARA is orange. 



EXPERIMENT: 



MEW 

10 OR. 1+16 
15 FOR R=O.0 
20 POS,, 9, R : 
25 ME XT' R 
30 BO TO 30 



12 
PR. #6; "*■ 



MEW 

10 GR„ 17 

20 POS . S ,, 1 1 

30 PR. #6$ "*##" 

40 GOTO 40 

50 END 
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CHALLENGE: 

Change Line 30 to inverse characters. 

30 POS . DOT , DOT : PR . #6 I "■" 



EXERCISES: 



The # is inverse. 



1. a) Clears the screen. 

b) Prints HI (white) in columns 10 & 11 of row 10. 

c) Prints blanks in columns 10 & 11 of row 10 (erases b). 

d) Prints HI (white) in the upper left corner of the screen. 

e) Prints HI (white) in the text window. 

f) Prints HI (white) in the text window. 

g) Prints a double width HI (orange) in the graphics window. 

h) Prints a double wide — double tall HI (light green) in the graphics window. 



2. 



c. 



d. 



Corners of 
entire screen 




Corners of 
graphics window 




Corners of 
text window 


0,0 39,0 
0,23 39,23 




*•■*•*••*!■ 




0,0 39,0 
0,23 39,23 


„ .1. 9 , § 

0,2 i 19,23 




, 1 9 , 

0, 19 19, 19 




0,20 19,20 
0, 23 19, 23 


, 19 , 

,, 1 1 1 9 , 1 1 




, 1 9 , 
,9 19,9 




0,10 19,10 

0,11 19,11 


, 1 9 , 
0,23 19,23 




, 1 9 , 

0,23 19,23 




■«• ■«■ # ■«■ 


0,0 19,0 
, 1 1 1 9 , 1 1 




, 19, 

,, 1 1 19,11 




#### 



3. Change the type of character — upper case to lower case or to inverse video. 

4. Add 16 to the 1 in GR.l — this gives GR. 17 

5.a. Clears screen — pause 

DANGER AHEAD — at column 10 row 8 — pause 
this continue to flash on and off until you press ( BREAK) 
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b. HELLO — in text window 

HELLO — at column 7 row 4 — double wide 
clear screen 

HELLO — at column 7 row 4 — double tall double wide 

Notice the same POS. numbers result in different locations when you change modes. 
6. a. change Line 20: 

20 F.A=1 TO 400: N. A 

b. change Lines 30 and 40: 

30 POS. 4,7! PR. #6; "GOODBYE" 
40 F.A=1 TO 500: IM. A 
omit Line 50 



CHAPTER 13 




■ 



YOUR TURN: 

No, the pixels are at different positions. In GR.4 the pixels are at the corners of the 
screen. In GR.6 the pixels are framing the upper left quarter of the screen. 

CHECKPOINT: 

1. GR.4 + 16 GR.6 + 16 

2. 0,0 

3. Y = 0, and X varies from to 79. 

4. Y = 0, and X varies from to 159. 

5. X = 79, and Y varies from to 39. 

6. X= 159, and Y varies from to 79. 

7. 80 print positions along X and 40 print positions along Y. 

8. 160 print positions along X and 80 print positions along Y 



CHALLENGE: 



a) NEW b) NEW 

1 BR . 6: C ., :l. 1 GR.6 : C . 1 

20 PL. . , 20 :: DR . 1 59 , 20 20 PI.... „ 20 , : DR „ 20 , 79 

30 END 30 END 



c) NEW d) NEW 

10 BR. 6 : C. 1 10 GR.6 : C. 1 

20 PL „ 20 ,,10 : DR. 139, 10 10 PL... 20, 10 ,". DR. 20,29 
30 DR. 139, 60 : DR. 20, 60 30 DR. 59, 29 :: DR. 20, 10 
40 DR.20, 10 40 END 
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e) NEW 

1 Rf 



20,40 :: DR. 140,40 :: DR. 140, 60 
20,40 :: DR. 80, 10 ;: DR. 140, 40 



UK, j£X>. 



THINK: 

1. L = length of the line. 

B = row containing the line. 

2. Line 30. The longest line is 159 graphics blocks long. 

3. Start at block position A and end at block position A + L. 

4. The TRAP avoids the cursor out of range error. It occurs when the cursor goes off the 
screen: when A + L > 159. 

EXPERIMENT 

The Computer lights pixels on the screen. It does not print the number nor the words. 

FUN TIME 



1 P 





2 

s 


I 


T 


I 





3 

N 








4 

R 


U 


5 

N 






R 




E 










L 




6 

T 








E 






7 
I 


N 


T 




8 

D 


R 


A 


W 


9 

T 











X 




10 

G 


N 




C 












R 




11 

L 


I 


S 


T 




R 


T 









12 

D 




13 




s 


A 


V 


E 










A 




14 

c 


L 





A 


D 






P 




T 




15 

s 


T 


E 


P 






»n>r 


,6 , 


17 

F 




18 

D 













H 






19 

R 


20 

E 


A 


21 

D 









22 
I 


N 


P 


u 


T 




I 








N 









23 

R 


E 


M 






N 






C 


24 

L 





A 


D 




S 










25 

R 


N 


D 






S 



EXERCISES: 



1. GR. 4 2. GR. 7 

3. GR. 7 + 16 or GR. 23. There is no text window for READY. 



MEW 

10 BR. 4 ;: C 

20 PI 10, 10 

50 DR. 69, 29 

40 DR. 10, 10 



DR. 69, 10 
DR. 10„29 



5. NEW 

10 BR. 4 : C. 1 
20 F. R=10 TO 29 
30 PL. 10,, R : DR. 69, R 
40 N„ R 
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6. MEW 

10 BR. 7 :: C„ 1 

20 PL. 80, 10 :: DR. 70,20 

30 DR. 70, 30 : DR. 60, 45 

4 D R . 1 , 4 5 :: D R . 9 , 3 

50 DR. 90, 20 : DR. 80, 10 

60 PR,, " TWINKLE TWINKLE" 



DR. 55, 213 
DR„ 80 j 35 

DR. 105,, 25 



7. a) Draws a large HI. 

b) Draws a flag in three colors. 

c) Draws a line with more than 100 pixels, then erases all the pixels after position 100. 

d) Draws a rectangle inside another rectangle, in different colors. 



8. a. NEW 

10 GR. 7+16 : 

15 REN G 
20 PL. 25,0 ! 
30 DP .5,95 1 
40 DR. 25, 80 
45 REM G 
50 PL. 30,0 I 
60 DR ,,55,95 
70 DR. 30, 
75 REN 
80 PL. 60,0 
90 DR. 85,, 95 
1 0!,.i DP: „ 60 r . 
105 REM D 

110 PI 90,0 

120 DR. 100, 95 

130 DR. 1 13,49 ;; DR. 1 15, 45 

140 DR. 100 , u :; DP,, 9«P, 

145 REM V 

150 PL. 120,0 ;: DR. 135, 45 

160 DR. 150,, 

170 PI 135,, 46 ;; DR„ 135, 95 

180 8„ 180 



DR. 3„ N 
DR. 2, 95 
DR. 15,80 

DR. 30,95 
DR. 55,0 



DR.,60,, 9! 
DR.. 83, 



DR „ 90 , 



b. NEW 

10 BR. 5+ .1.6 

20 FDR T=l TO 3 

$§ READ A, "-'■ „ y 

40 C„A : PL. X, Y 

50 FOR L=l TO 3 

fa@ READ X „ ¥ 

70 DR. X ,, V 

80 NEXT'' L 

90 NEXT T 

100 DA 10 1 s Mi, 0, 0, 24 

1 10 DAI A ""&„ 42 , %0 , 

1 £0 DA? ?, 3 0;, ?, 6, 23 

1 :'0 DA f'A 68, 40 , 3.7, 3 

140 DATA 3, 30, 10, 18, 21 

130 DAI A '52, 732, 83 ., j 

160 B. I Mi 
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APPENDIX I 



ATARI RESERVED WORDS AND ABBREVIATIONS 



The following is an alphabetic directory of the reserved words, and their abbrevia- 
tions. The period is required. The listing also includes the chapter in which each of 
the reserved words is introduced. This list includes only reserved words introduced 
in this book. 






CLOAD 


CLOA. 


G 


COLOR 


C. 


13 


CSAVE 




G 


DATA 


D. 


5 


DIM 


DI. 


5 


DOS 


DO. 


G 


DRAWTO 


DR. 


13 


END 




a 


FOR 


F. 


10 


GOTO 


G. 


9 


GRAPHICS 


GR. 


12 


IF 




8 


INPUT 


I. 


7 


INT 




1 1 


LET 


LE. 


a 


LIST 


L. 


5 


LOAD 


LO. 


G 





NEW 




a 


NEXT 


N. 


10 


PLOT 


PL. 


13 


POKE 


POK. 


13 


POSITION 


POS. 


12 


PRINT 


PR. OR ? 


ty 


READ 


REA. 


5 


REM 


R. 


1 


RND 




11 


RUN 


RU. 


a 


SAVE 


S. 


G 


SETCOLOR 


SE. 


3 


SOUND 


SO. 


3 


STEP 




10 


THEN 




B 


TO 




10 


TRAP 


T. 


9 
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ERROR MESSAGES 






Memory insufficient. 

Value error. 

Too many variables (128 maximum). 

String length error. 

Out of data error. 

Number > 32767. 

Input statement error. 

Array or string DIM error. 

Argument stack overflow. 

Floating point overflow/underflow error. 

Line not found. 

No matching FOR statement. 

Line too long error. 

GOSUB or FOR line deleted. 

RETURN error. 

Garbage error. 

Invalid string character. 

LOAD program too long. 

Device number error. 

LOAD file error. 

BREAK abort. 

Nonexistent device. 

Attempt to ENTER a SAVEd file. 

Cursor out of range. 

Insufficient RAM. 

File not found. 
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GRAPHICS MODES 





SCREEN SIZE 






GRAPHICS 
MODE 


WITHOUT WITH 
TEXT WINDOW 


#OF 
COLORS 


SE. REGISTERS 




and all 

text 

windows. 


*** 40x24 


3 


1 character luminance 

2 background 
4 border 


1 


20 x 24 20 x 20 


5 


upper case letters 

1 lower case letters 

2 upper case inverse 

3 lower case inverse 

4 background/border 


2 


20x12 20x10 


5 


same as GR.l 


3 


40 x 24 40 x 20 


4 


lines 

1 lines 

2 lines 

4 background/border 


4 


80 x 48 80 x 40 


2 


lines 

4 background/border 


5 


80 x 48 80 x 40 


4 


same as GR.3 


6 


160x96 160x80 


2 


same as GR.4 


7 


160x96 160x80 


4 


same as GR.3 


8 


320x192 320x160 


3 


same as GR.O 


9 


80x192 *** 


1 


4 1 color/16 luminances 


10 


80x192 *** 


9 


use POKE 704 through 712 


11 


80x192 *** 


16 


4 16 colors/1 luminance 
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COLOR CHART 



NUMBER 


COLOR 





BLACK 


1 


GOLD 


2 


ORANGE 


3 


RED-ORANGE 


4 


PINK 


5 


VIOLET 


6 


PURPLE-BLUE 


7 


BLUE 


8 


BLUE 


9 


LIGHT BLUE 


10 


TURQUOISE 


11 


GREEN-BLUE 


12 


GREEN 


13 


YELLOW-GREEN 


14 


ORANGE-GREEN 


15 


LIGHT ORANGE 
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SOUND CHART 





NOTES 


PITCH VALUE 


HIGH 


C 


29 


NOTES 


B 


31 




A # or B b 


33 




A 


35 




G # or A b 


37 




G 


40 




F# or G b 


42 




F 


45 




E 


47 




D # or E b 


50 




D 


53 




C # or D b 


57 




C 


60 




B 


64 




A# or B b 


68 




A 


72 




G# or A b 


76 




G 


81 




F# or G b 


85 




F 


91 




E 


96 




D# or E b 


102 




D 


108 


MIDDLE 


C# or D b 


114 


C 


C 


121 




B 


128 




A# or B b 


136 




A 


144 




G # or A b 


153 




G 


162 




F# or G b 


173 




F 


182 


LOW 


E 


193 


NOTES 


D# or E b 


204 




D 


217 




C # or D b 


230 




C 


243 
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INDEX 



SUBJECT PAGE 

A 

abbreviations 10, App. I 

addition 8 

ADVANCE button 44 

area program 23, 33 

argument 109 

Arithmetic operations 8 

asterisk 8 

Atari key 4 

averaging 36, 1 1 6 

B 

background 17 

BACK S key 3, 6 

backup 48 

BASIC 8 

BASIC cartridge 3 

BASIC instruction 8, App. I 

BLAST OFF 98 

border 17 

BREAK key 79 

C 

CAPS LOWR key 15 

capitals 15 

cassette 1 

ADVANCE button 44 

loading a program 44 

PLAY button 44 

RECORD button 44 

saving a program 43 

Celsius 60 

Centimeters 26, 65 

chaining 1 9, 56 

Christmas song 101 

CLEAR key 6, 35 

clear screen 57, 1 44 

CLOAD 44 

coin toss 112 

colon 1 9, 56 

color 16, App. IV 

COLOR 1 38 

column 1 23 

comma 

DATA 33 

DIM 35 

READ 33 

PRINT 27, 30, 36 

trailing 95 

comparison symbols 68 

COMPUTER MAGIC 57 

COMPUTER QUIZ 69 

conditional transfer 83 

control (see CTRL) 

coordinates 121 

COUNTDOWN 98 

counter variable 1 02 
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SUBJECT PAGE 

counters 80, 85 

crossword puzzle 11,145 

CSAVE 44 

CTRL key 4, 13, 21 

arrow 13 

CAPS LOWR 15 

DELETE BACKS 13 

INSERT 15 

cursor 1 3, 1 22 

D 

DATA 33, 39 

DELETE key 3 

degrees 

Celsius 60 

Fahrenheit 60 

digital counter 43 

dice 112 

DIM 35 

directory 50 

disk 47,51 

DOS 47 

drive 47 

format 48 

load 50 

master 47 

program name 50 

save 49 

system 49 

display 11 

division 8 

slash 8 

dollar sign 34 

do-nothing loops 98 

DOS 47 

menu 48 

DRAWTO 138 

E 

editing 15 

END 18,25,29 

equal to 68 

erase 13 

line 13 

screen 35, 57 

error messages 13, App. II 

ERROR 6 81 

error trap 82 

ESC key 57 

ETCH-A-SKETCH 159 

F 

Fahrenheit 60 

FIREWORKS 157 

flowchart 66 

FOR/NEXT 93, 102 

body 102 



INDEX 



SUBJECT 



PAGE SUBJECT 



PAGE 



counter variable 1 02 

STEP 96 

format 48 

four color mode 1 42 

FORTUNE WHEEL 114 

FUN TIME 11, 20, 38, 45, 62, 73, 98, 145 

G 

games 

see programs 

GOTO 79 

IF 84 

READ 81 

GRAPHICS 125, 144 

graphics blocks 141 

graphics characters 15 

graphics modes 121 , App. Ill 

121 

1 125, 128 

2 125, 130 

3 142 

4 135 

5 142 

6 135 

7 142 

8 147 

graphics window 1 26 

greater than 68 

greater than or equal to 68 

H 

heads 112 

HI-LOW program 45 

I 

IF-THEN 68 

loops 84 

strings 71 

infinite loop 79, 1 38 

INPUT 55, 59 

INT 109 

INSERT key 15 

instruction 8, App. I 

inverse video 1 43 

K 

keyboard 1 , 2, 6 

L 

less than 68 

less than or equal to 68 

LET 23, 25, 26 

line 

change 39 

delete 39 

number 29 



LINES GALORE 141 

line numbers 25, 29 

LIST 35, 39 

living room program 23, 33 

LOAD 50 

loop 79, 93 

body 102 

do-nothing 98 

infinite 79 

nested 98, 103 

lower case 15 

LPRINT 11 

M 

margins 95 

MASTERFIND 156 

master disk 47 

menu 47 

messages 

error 13, App. II 

print 9 

minus 8 

modes (see graphics modes) 

monitor 1 

multiplication 8 

asterisk 8 

star 8 

music 18 

N 

nested loops 98, 1 03 

NEW 25 

NEXT 93 . 

not equal to 68 

numerical variables 34 

initial values 30, 40 

O 

origin 123 

P 

parentheses 36 

pixel 1 36 

PLAY button 44 

play Computer 1 00 

PLOT 138 

plus ° 

POKE 95 

POSITION 122,123 

column 1 23 

row 1 23 

with PR 129 

PRINT 8,11,29 

clear screen 57, 1 44 

comma 27, 30, 36 

messages 9, 1 0, 33 
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PR 10 

PR.#6; 126 

? 10 

quotation marks 9 

semicolon 27, 30, 36 

program 24, 30 

COMPUTER MAGIC 57 

ETCH-A-SKETCH 1 59 

FIREWORKS 158 

HI-LOW 45 

WITH A LYING COMPUTER 154 

MASTERFIND 1 55 

names 50 

SHOOT THE DUCK 157 

TIMED ARITHMETIC DRILL 1 54 

WHEEL OF FORTUNE 160 

Q 

question mark 

INPUT 55 

PRINT 10 

quotation marks 9 

strings 34 

quotes (see quotation marks) 

R 

random numbers 1 07 

READ 33,39,59 

ERROR 6 81 

GOTO 81 

READY 3, 7 

RECORD button 44 

recorder 1 

digital counter 43 

load 44 

save 43 

REM 60 

remarks 60 

RETURN key 7 

RND 107 

row 1 23 

RUN 25 

S 

SANTA 55 

SAVE 49 

screen 6 

background 17 

border 17 

clear 35, 57, 144 

display 11 

zones 27 

semicolon 27, 30 

trailing 95 

SETCOLOR 16 

SE 21 



SHIFT key 4 

CAPS LOWR 15 

CLEAR 4,6,35,57 

DELETE 4,6 

INSERT 15 

SHOOT THE DUCK 157 

slash 8 

SNOWDAY 65 

SOUND 18, App. V 

END 18 

quality 18 

SO 21 

tone number 18 

voice number 18 

volume 18 

SPACE BAR 3 

special symbols 3,15 

special keys 4 

star 8 

STEP 96 

string variables 34 

IF 71 

initial value 40 

READ 36 

subtraction 8 

sums 1 00 

surprise numbers 1 07 

symbols 

comparison 68 

operation 8 

special 3 

system disk 48 

SYSTEM RESET 4, 16 

T 

tails 112 

tape 43 

temperature conversion 60 

TERMITE TIME 145 

text window 1 26 

eliminate 1 29 

THEN 68 

TIME OUT FOR OLD NEWS 6, 21 , 30, 40, 62, 87, 

102, 118, 131, 148 
toss 

coin 113 

dice 112 

trailing comma 95 

trailing semicolon 95 

transfer statements 

conditional 83 

unconditional 83 

TRAP 81,82 

TRUE/FALSE 72 

TWELVE DAYS OF CHRISTMAS 101 

two color modes 1 35 
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Michael P. Zabinski, Ph.D. is a professor at Fairfield University, Fairfield, 
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Shack. 



National Computer Camps, 1 
Post Office Box 585 
Orange. Connecticut 06477 



V. 



SAMS 



ATARI For Kids 
From 8 to 80 



Dr. Michael Zabinski is the founder and president of the National Computer 
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